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Preface 



After getting severely "bitten" by the personal-computer bug a few years ago, 
and looking at my disk drives for many hours, I finally got the urge to find out how 
to control them. I love system stuff, — controlling and such. I had this 
preoccupation to write a disk operating system (to be released as EZ/DOS in the 
coming months) for the Model I and III. I thought it would be a good experience, 
but I didn't know what I was up against. Not that disk I/O is extremely difficult! 
— it was just hard to find any complete documentation on the subject. I had found 
a few articles that were somewhat helpful, but they lacked complete coverage of 
the disk I/O subject. After spending many weeks and late nights deciphering 
disk-controller chip specification sheets and consuming several six packs of root 
beer, I knew how to completely control the TRS-80 Model I disk system. 

This book is the result of my "discoveries" on the subjects of disk I/O and 
utilizing the Model I's interrupt system. The purpose of this book is to inform 
anyone familiar with Z-80 assembly-language programming how to control the 
TRS-80 Model I and III disk drive interrupt systems. Driver routines for every 
function described, with abundant examples, are included in this book. It also 
covers utilization of TRSDOS assembly-language file I/O calls and techniques. 

This book was composed and edited using a TRS-80 Model I with 48K of RAM, 
an LNW 5/8 doubler, an RS-232, two Tandon 40-track drives, an Epson MX-80 
printer, a Spinterm printer. Electric Pencil word-processing software, and lots of 
root beer and late-night radio talk-shows. 

I would like to give special thanks to the following people who have helped make 
this book a reality: Jewell and Joe, Harv Pennington, Western Digital Corp 
Tandy Corp., and all the nice folks at IJG. 

Mike Wagner 

April, 1982 
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What is a Mini-Floppy? 




What is a Mini- Floppy? 

The mini-floppy diskette system used by the TRS-80 Model I and many other 
microcomputers is a miniaturized version of the 8-inch floppy disk systems used in 
many microcomputer and minicomputer installations. The diskette itself is a flat, 
round piece of plastic that is coated with a magnetically sensitive oxide material. 
It looks similar to a 45 RPM record, but there aren't any grooves on it. The diskette 
has a 1 1/8-inch centering hole in its middle and an off-center index hole used by 
the drive for timing the revolutions. The disk is provided with a protective jacket 
to prevent finger prints or foreign matter from contaminating the diskette's 
surface. Users are warned (usually on the disk jacket) not to touch the exposed 
areas of the disk and not to write on the jacket with anything harder than a felt-tip 
pen. Also, the disks are heat sensitive, so leaving a disk inside an automobile will 
usually cause destruction of the jacket within an hour. 

For microprocessor based systems, the 5 1/4-inch mini-floppy comfortably fills 
the gap between the serial-analog tape units (which are generally too slow for most 
peoples' patience and somewhat unreliable during high-volume data transfers), 
the higher cost of 8-inch floppy disk systems, and hard disk systems. Also, they are 
much faster than paper tape or punch-card systems. 

Data is stored on the diskettes by making some parts of the disk more 
magnetically positive and other parts more magnetically negative. In 
IBM-compatible 3370 single-density installations (such as the Model I), the data 
is stored on the disk as one pulse in a given time as logical 0, and two pulses as 
logical 1. The writing, reading and converting of these pulses into full 8-bit bytes 
(characters) is the job of the Floppy Disk Controller in your expansion interface, 
which I shall refer to from now on as simply 'the controller'. 

The disk drives themselves are not too sophisticated, although they perform, 
some timing functions. The drives basically contain three elements. The first is a 
motor system that rotates the diskettes inside their protective jackets at a rate of 
300 RPM (or 5 rotations per second). Second, the drives contain a read/write head 
that is used to read and write data to and from the diskettes. This read/write head 
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is similar to the record/playback head of a cassette tape recorder, but it is much 
more delicate and sensitive. The read/write head is positioned over various Tracks 
of data on the diskettes, as shown in Fig. 1.1. The number of tracks a disk drive can 
handle varies with the manufacturer, but the currently available track-handling 
capacities for 5 1/4-inch drives are 35, 40, 77 and 80 tracks, single- or double-sided. 
Most drives can handle double-density operation if used with a double-density 
controller. 



Figure 1.1 Diskette Data Tracks 



I 



SECTOR NUMBERS 

(NOT SHOWN ON DfSK) 




TRACK 

TRACK 35* 
(SECTOR 2) 



:{: NOTE: DISKS MAY CONTAIN 
UP TO 80 TRACKS. 



The third element of the drive is the electronics that can send signals back to the 
floppy disk controller and tell it that the diskette currently in place cannot be 
written to because of a special 'write-protect tab' that is placed on the 
*write-protect slot'. 
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Tracks and Sectors 



Figure 1.2 Diskette Envelope 



WRITE PROTECT NOTCH 




INDEXTIMINGHOLE 



RECORDING SURFACE 



The drive can also tell the controller that the 'index hole detector' has detected 
the hole in the diskette known as the Index Hole'. This means the first byte of data 
on the track that the read/write head is currently placed over is just about to pass 
by the read/write head. The drive also has a 'select indicator light' (usually a red 
light-emitting diode) on the front to let you know when a drive is being accessed. 

Tracks and Sectors 

As you probably know, the term 'byte' means 8 particular 'bits' (or binary 
digits). The term 'sector' is the name given a particular group of bytes on a track. 

A 'track' represents a group of sectors. All the sectors on a given track are 
generally referred to as 'the track', although other disk data that is used by the 
controller, but not normally accessed during sector I/O operations, is also stored 
on 'the track' 
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Figure 1.3 Diskette Tracks and Sectors 



TRACK/SECTOR I.D. 
TRACK 0, SECTOR 1 




TRACK 0. SECTOR 1 
256 BYTES 



Data is written and read a full sector at a time. After positioning the head over 
a desired track, the controller is commanded to read or write a sector. For every 
byte transferred, the controller turns on a bit in its Status Register that is called 
a 'data request' flag, or DRQ. When the DRQ goes on, the controller either desires 
the next byte to write during write operations or reads the next byte during read 
operations. The bytes are read or written to another address known as the *data 
register.' 

The standard sector length for the TRS-80 Model I is 256 bytes; however the 
FD1771 is capable of many other sector lengths. 

A Technical Explanation of the FDC 

The device housed inside the expansion interface which controls the disk drives 
(driven by your software) is the Western Digital FD1771B plastic or ceramic 
encased floppy disk controller IC chip. 

In the TRS-80, the floppy disk controller is linked to the main processor (which 
is a Z-80) via the Z-80 memory address lines and data input/output lines. Since the 
floppy disk controller does not use the Z-80 port feature, it is considered to be 
Memory Mapped. This memory mapping technique is actually an advantage when 
you consider the TRS-80's slow (1.77 MHz) clock speed. This is because there are 
more Z-80 'opcodes' for memory addressing than there are for port addressing, 
suchasBIT0,(HL). 
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The channels that the Z-80 uses to communicate with the floppy disk controller 
'registers' are addressed as memory locations just as the video and keyboard are. 
Addressing floppy disk controller registers is just like addressing any other 
memory location. For example: 

LD A,(37ECH) ;READ THE CONTROLLER'S STATUS 

The links between the Z-80 and the controller are made through eight 'data 
access Unes' and the associated device control signals. The data access lines are 
used in transferring track and sector data, drive/diskette status, controller status 
and commands into and out of the FD1771 controller. 

Addresses for Controlling the FDC 

There are five dedicated memory locations for controlling the floppy disk 
controller. A memory WRITE means to write a byte to a memory address. A 
memory READ means to read a byte from the memoy address. Below is an 
example of reading the controller's status. 

LD A,(37ECH) ;READ CONTROLLER'S STATUS 

The following will read the 'track' register: 

LD A,(37EDH) ;READ TRACK REGISTER VALUE 

Writing a byte address (37EC) issues a command byte to the Command Register. 
The following will write a DO to the controller, causing it to reset, and then read 
the controller's status. 



Figure 1.4 Controller Status Read Routine 



LD 
LD 
LD 
LD 



HL,37ECH ;HL-> COMMAND/ STATUS REG 

A,0D0H ;A= RESET COMMAND 

(HL),A ; ISSUE VIA INDIRECT ADDRESSING 

C,(HL) ;READ STATUS INTO REG C 



The following addresses are linked to the various registers of the controller: 



Figure 1.5 Controller Register Addresses 



Address 


OP- type 


37 E0 J9e< 


WRITE TO 


37 EC 


WRITE TO 


37 EC 


READ FROM 


37 ED 


WRITE/ READ 


37EE 


WRITE/ READ 


37EF 


WRITE/READ 



Bits Contain 

DESIRED DRIVE SELECT CODE 

DESIRED CONTROLLER COMMAND 

CONTROLLER'S STATUS 

CURRENT TRACK 

LAST/DESIRED SECTOR 

DATA BYTE TRANSFER, OR DESIRED TRACK 
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37E0 is the memory address that controls the selecting of the desired drive. 
Selection of a desired drive must be done before any operation can take place on 
it, whether that be positioning the read/write head, formatting a track, or reading 
and writing sectors. Reading this address will not give you the select code that you 
issued to it. Full details on selecting drives are given in the next chapter. 

37EC is the memory address that links to the controller's Command/Status 
Register. When a Z-80 WRITE operation is made to this address, the byte written 
is loaded into the controller's Command Register, and the controller acts 
according to the command issued (if no operation is currently being performed). 
Otherwise, the command byte will be ignored unless it is a special FORCE 
INTERRUPT command which terminates the current operation. 

Here is an example of issuing a controller command. 

LD A,OCOH ;CONTROLLER CMD BYTE 
LD (37ECH),A ;ISSUE COMMAND 

By executing a Z-80 read from the 37EC memory address, the status of the 
current or last operation is returned from the controller's 8-bit Status Register. 
Each bit of the returned status indicates a status of something relating to the 
current function. Not all bits have the same meaning when reading the status of 
different disk functions. 

Although the Command Register and the Status Register share this command 
memory address, they are independent controller registers. They share this 
common address for convenience. READS from the Command Register and 
WRITES to the Status Register are impossible. More on the Command and Status 
Registers will be presented later. 

37ED is the memory address that links to the Track Register. This 8-bit Track 
Register holds the track number of the current position of the read/write head. 
Depending on some options, this register may be incremented (a fancy word for 
saying add one) each time the head is stepped in and is decremented (a fancy way 
of saying subtract one) when the head is stepped out. The Track Register may be 
written to and read from by accessing 37ED. 

An example of reading the Track Register is presented below. 

LD A,(37EDH) ;READ TRACK REGISTER 

37EE is the memory address that links to the Sector Register. The 8-bit Sector 
Register holds the address of the desired sector to be read or written. The Sector 
Register may be written to and read from by accessing 37EE. 

Here is an example of writing to the Sector Register. 



Figure 1.6 Sector Register Write Routine 



LD A^6 ; AMOUNT TO LOAD SECTOR 

; REGISTER WITH 
LD (37EEH) ,A ;LOAD SECTOR REG 
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37EF is the memory address that links to the Data Register. This 8-bit Data 
Register is loaded with the byte to be written to disk (when called for by testing the 
Data Request bit in the Status Register) during a write operation. When doing a 
read operation, the Data Register contains the byte to be read by your software 
when the Data Ready bit is set in the Status Register. 

Here is an example of reading the Data Register. 

LD A,(37EFH) ;READ DATA REGISTER 

The Command/Status Register. 

The Command and Status Registers are two independent FD1771B registers. As 
previously mentioned, reads are impossible from the Command Register, and 
writes are impossible to the Status Register. But of course you may read the Status 
Register and write to the Command Register. 

The 8-bit Status Register holds the status information of the current disk 
operation. As previously mentioned, this register can be read but cannot be written 
to. 

Here are the Status Register bits during and after the various types of 
operations: 



Figure 1.7 Status Register Bits 



STATUS BIT DURING TYPE I COMMANDS 
(Any Head Movement) 



7 6 







Li 



Busy - operation in progress. 
Index hole in sync with sensor. 
Head is at track zero, 
CRC error during track verify. 
Desired track was not verified. 
Head is loaded and engaged. 
Disk in drive is write protected, 
Not Ready - drive motors off. 



DURING TYPE 2 COMMANDS 
{Read Sector, Write Sector) 



7 6 5 







Busy - operation in progress. 

Data request. 

Lost data. 

CRC error. 

Record not found. 

Rec type on read, write fault on write. 

Rec type on read^write prot on write. 

Not Ready - drive motors off. Listing Continued .. . 
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. Continued Listing 



DURING TYPE 3 COMMANDS 
(Write Track (Format) , Read Track, Read Address) 



4 3 2 


1 









L 


— 











Busy - operation in progress. 

Data request. 

Lost data. 

<Unused> 

<Unused> 

Write fault on write, unused on read. 

Write prot on write, unused on read. 

Not Ready - drive motors off. 



TRS-80 Model I Disk Format 

A particular operation known as WRITE TRACK, or FORMATTING, must be 
done to a track before sectors can be written and read by the floppy disk controller. 
Certain bytes are written to the diskette during this procedure and must be there 
when the diskette is accessed by the controller. The initialization of sectors and 
their address identification bytes is done during this process. 

Figure 1.4 shows Western Digital's recommended track format. Some people 
run into problems with this disk format on a 5 1/4-inch floppy, because there just 
isn't enough room on the disk to put in all the overhead bytes plus the data. Most 
people don't know that the format recommended in the FD1771's data sheet is 
IBM format for 8-inch drivesl All those overhead bytes are not needed, and can't 
fit on a 5 1/4-inch disk track. 



These bytes are written pnce at the start of every track: 



Figure 1.8 Western Digital Track Format 



Number 
of Bytes 

40 

6 

1 



26 



Hex Value of 
Byte Written 



00 or FF 

00 

FC (index mark - track data starts here 
- unused by the floppy disk controller, 
but is useful when reading full tracks) 

00 or FF 
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This group of bytes is written once per sector: 



Figure 1.9 Western Digital Sector Format 



6 00 

1 FE (ID address mark - next 6 bytes are the 

sector address. 

1 Track number (0-FF) 

1 Side number (0 or 1 - use for TRS-80 stuff) 

1 Sector number (0-EF, usually to 9) 

1 Sector length (should be 01 for 256 byte 

sectors) 

I F7 (this byte issued causes two CRC bytes of 

the 6 address byte to be written) . 

II 00 or FF 
6 00 

1 FB (data address mark - data comes now) 

256 Sector data (IBM uses E5 r so does TRSDOS) 

1 F7 (cause two CRC's of the data to be 

written) 

27 00 or FF 



After the 10 sector-groups are written, write FF's until the floppy disk controller 
goes to 'not busy status.' 
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The Sector Length byte is used by the floppy disk controller in computing how 
many bytes are in the sector when doing sector I/O. The floppy disk controller can 
perform two modes of computation of sector length. The first is called IBM format. 
If the IBM Format Bit is set in the sector read or write Command Byte issued to 
the floppy disk controller, the controller calculates the sector length to be as 
follows: 



Figure 1.10 Sector Length Calculation 



SECTOR LENGTH BYTE 


Length of Sector 


in Sector Address 


in Bytes. 


00 


128 


01 


256 


02 


512 


03 


1024 



If the IBM format bit is not set in the read/ write command, here's how the 
floppy disk controller computes sector length: 

SECTOR LENGTH = (sector length byte * 16) 

If the sector length byte is zero, it is considered to be 256. 

Here is a graphic description of how non-IBM formats are computed: 



Figure 1.11 Non-IBM Format Computation 



Sector Len Number of Bytes 
Byte (Hex) in Sector (Decimal) 



01 


16 


02 


32 


03 


48 


04 


64 


05 


80 


• 


• 


• 


• 


• 


• 


FE 


4064 


FF 


4080 


00 


4096 
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This non-IBM format type calculation will give you sector lengths up to 4096 
(256*16). The smaller the sector lengths, the more overhead it takes, and you lose 
data space. 256-byte sectors are pretty-much optimum for our use. TRSDOS uses 
standard IBM-compatible, 256-byte sectors, so the Sector Length byte is 1 when 
formatting, and the IBM format bit is set in the read/write sector command bytes 
when doing sector I/O. 

The Sector Data bytes are the initial data that the sector contains. Have you 
ever looked at the sectors of a freshly formatted disk with some disk utility? That 
is what these bytes are. Any bytes except FO - FF may be written as the initial 
sector data (TRSDOS uses E5). You may not use FO - FF because when 
formatting (Write Track), the floppy disk controller uses these as control bytes. 
When doing sector writes, you may write anything you wish to the sector. 

In Figure 1.4 did you notice all those overhead bytes? These bytes are used as 
'padding.' Some of those bytes are not required, and do not have to be used. For 
example, you don't have to use those 40 bytes preceding the FC index mark, or the 
26 bytes preceding the first sector, etc. Most of these bytes are unnecessary on 5 
1/4-inch disks, and if written, you would not be able to fit 10 sectors on a track. 
Also, the Index Mark is not used by the controller. 

Here are the formatting bytes I use for TRSDOS compatible sectors, and I've 
never had a problem using the following format. 

These bytes are written once at the start of every track. 



Figure 1.12 TRSDOS Track Format Bytes 



Number Hex Value of 

of Bytes Byte Written 



FC (index mark-track data starts here-unused 
by the floppy disk controller, but is 
useful when dumping full tracks. 



26 00 or FF 



These Bytes are Written Once Per Sector. 



Figure 1.13 TRSDOS Sector Format Bytes 

Filler 



00 
The Sector ADDRESS MARK 



FE (SECTOR ID address mark - next 6 bytes are 
the sector address. Listing Continued .. . 
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.Continued Listini^ 



The Sector ID 



1 Track Number (0-FF) 

1 Side Number (0 or 1 - Floppy disk controller 

ignores this byte) 
1 Sector Number (0-FF) 

1 SECTOR LENGTH (See text). 

1 F7 (This byte issued causes two CRC bytes of 

the 6 address byte to be written.) 



More Filler Padding 



11 00 or FF 

6 00 



The Sector DATA ADDRESS Mark 
1 FB (Data Address Mark - Data Comes Now) 

User Data 
(See Text) DATA BYTES (IBM Uses E5 r So Does TRSDOS) 



F7 (Cause Two CRC Bytes to be written 
after the data) . 



More Filler 
27 00 Filler 



After the 10 sectors are initialized, FF's are to be written until the floppy disk 
controller goes to not-busy status. 

The only required 'padding' bytes the controller needs in order to do sector 
access is 17 bytes between the sector ID and the sector data. The first 11 bytes are 
FF, and the last 6 bytes are 00. Also, one byte of 00 must precede every sector ID 
address mark. 

There is a disk formatting program for your use in Chapter 8. 
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Model III Disk Controlling System 

The Model III uses a Western Digital FD1793 for floppy disk controlling. The 
FD1793 floppy controller is virtually identical to the FD1771 except that it has 
double-density capability. Also, as matter of interest to hardware buffs, the 
FD1793 has a true bus instead of the inverted bus which the FD1771 uses. Other 
minor differences exist which will be explained as they come up. 

The Model III does not use memory-mapped addresses for controlling the disk. 
Instead it uses Z-80 ports. The Model III has a number of other hardware features 
that the Model I does not have. These hardware features aid in controlling the 
disk, handling real-time clock interrupts and device interrupts from the RS-232 
and 1500 baud cassette. Disk I/O is handled in a slightly different manner from the 
Model I. 

The following is a list of the ports used in controlling the Model III disk. 



Figure 1.14 Model III Disk Control Ports 



Use 

Read the FDC status. 
Issue an FDC command. 
FDC track register. 
FDC Sector register. 
FDC Data register. 
Select drive and options. 
Select non-maskable interrupt 
options. 
E4 Read Read non-maskable interrupt 

status. 



Port (hex) 


Data Flow 


F0 


Read 


F0 


Write 


Fl 


Read/Write 


F2 


Read/Write 


F3 


Read/Write 


F4 


Write 


E4 


Write 



Ports FO through F3 correspond to the memory addresses 37EC through 
37EF on the Model I. These are used to 'talk' directly to the controller. 

The following is an example of reading the controller's status. 

IN A, (0F0H) ;Read FDC status 
LD (0BF00H),A ;Store in RAM 
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Model III Disk Controlling System 



Port F4 IS used in selecting the desired drive similar to the memory address 
37E0 on the Model I. This port is also used in selecting other disk related features 
as shown m the following list (all bits are assumed to be in the 1 state). 



Figure 1.15 Port F4 Bit Summary 

Port F4 Bit Summary. 
Bit Use 

7 Select Double-density. 

6 Generate Data Waits, 

5 Set, Write Precomp. 

4 Select Side 1. (Not Used). 

3 Select Drive 3. (Same as Model I) 

2 Select Drive 2. (Same as Model I) 

1 Select Drive 1. (Same as Model I) 

Select Drive 0. (Same as Model I) 



Or, you may address the port using register 'C. 

LD C,0F0H ;Load cmd/stat port number 

IN E,C ;Read FDC status to E 

LD D,0D0H ;Reset FDC command 

OUT (C) ,D ;Issue reset command 

Bit 7 is used in selecting the desired density of operation. Outputting a byte that 
has this bit set will cause double-density mode to be invoked, until a byte that has 
this bit reset is written, which causes single-density to be invoked. 

Bit 6 is used to enable Z-80 waits during data I/O. This is used during sector and 
track I/O to prevent 'lost data' errors. This will be fully explained in a later 
chapter. 

Bit 5 causes 200-microsecond write pre-compensation to occur during data 
writes. This should be set when writing to tracks 22 and above if you're in the 
double-density mode. 

Bit 4 is potentially useful for selecting the second side of a drive. Radio Shack 
drives do not support dual sided operation. 

Bits 3 through are used in the same manner as the Model I to select the desired 
drive. Every time a drive is selected, the byte used for selecting must also contain 
the desired bit pattern to invoke the above options. This takes a little more 
programming than the Model I, but it is much more versatile. 

The following is an example of selecting drive with double-density set. 

^Pm ^'r,^^^ ; Drive code, and DDEN 

OUT (0F4H),A ;Select drive 
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Model III Non-maskable Interrupts 

The Model III allows disk routines to utilize the Z-80 non-maskable interrupt 
(NMI) facility for disk I/O operations. This, coupled with the Z=80 Wait State 
function (described in the next chapter's supplement) makes it easy to use 
double-density without 'tricky' I/O loops. In my opinion, the Model III is an 
excellent machine when it comes to disk I/O. 

The disk I/O non-maskable interrupt (NMI) feature allows two options to be 
independently selected. First, NMI occurs when an FDC interrupt request occurs, 
or in other words, when an FDC function is finished. And secondly, NMI occurs 
when the disk drive motors shut off or 'time-out'. These NMI features allow the 
elimination of testing for these conditions during disk I/O. This, combined with 
the Z-80 Wait State feature, allows smooth operation of double-density, without 
lost data errors due to slow processor speed. You might ask, "Why didn't Tandy 
simply increase the processor clock speed?" Tandy wanted to keep Model I 
compatibility with games and real-time software that was programmed to operate 
at the slow processor speed — although they are slightly different (1.77 vs. 2.0 
MHz). 

The non-maskable interrupt vector is located at 4049 - 404B. You must have 
a jump to your interrupt routine at this vector when using the NMI feature. 

Below are the ports used in selecting non-maskable interrupt disk functions. 



Figure 1.16 NMI Select Forts 



Port E4 - Write - Select Options. 

Bit Purpose 

7 l=Cause NMI on FDC Interrupt (Function Done) 
6 l=Cause NMI on Drive TIME-OUT. 
5-0 Unused. 



To select the desired options, you could load the 'A' register with the desired 
options set, and perform an OUT (0E4H),A. 
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Figure 1.17 NMI Status Read Routine 



Port E4 - Read - Get NMI Status, Determine What Caused NMI. 

7 0=FDC Interrupt Caused NMI. 

6 0=Drives Timed-out. 

5 0=Reset Button Pushed. 

4-0 Unused. 



Don't get excited about using bit 5 to detect the reset button. The ROM routine 
intercepts this before jumping to the NMI vector at 4049. The ROM routine 
jumps to its boot-strap loader if this condition occurs. Sorry about that! 

Model III Double-density Disk Format 

The Model Ill's single-density format is exactly the same as the Model I's 
single-density format. The formatting procedure is the same for single- or 
double-density, but the actual format is not. The sectors and overhead bytes are 
arranged the same, but the overhead bytes differ in value and quantity. 

This format must be followed carefully for a correct format to be accomplished. 
Any deviation may lead to the last sector being chopped off, or sectors that can't 
be accessed — so follow it carefully. Before issuing a format command, you must 
set up the buffer exactly as the track is to be written. 



Figure 1.18 Overhead Byte Format 



Number 

of Bytes Hex Value Purpose 



24 4E 'iV' Pre-track Filler 

12 00 Pre-track Filler 

3 F5 Pre-track Filler 



This block is written once per sector. Since we are going to use the 18-sector 
scheme, this block will be written 18 times, with slight alterations to the Sector ID 
Block, i.e., sector name and track number. The blocks are written one right after 
the other. 
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Model III Double- density Disk Format 



Figure 1.19 Sector ID Block 

1 
1 



1 
1 



1 
22 

12 

3 

1 

256 

1 

24 

12 

3 



FE 
XX 

00 
XX 

01 

F7 

4E 
00 
F5 
FB 
E5 
F7 
4E 
00 
F5 



Sector ID Address Mark, 

Track Number, This MUST be 
CorrectI 

Side Number. Use 00. 

Sector Number. This Value Will 
be the Sector Name. E.I. 05 = 
SECTOR 5. See Text for Details 

Sector Length Computation 
Value. See Text. 

Generate CRC Parity Bytes. 

Pre-sector Data Sector Filler. 

Filler. 

Filler. 

Sector Data Mark. See Text. 

Initial Sector Data. 

Generate Sector Data CRC. 

Post Sector Filler. 

Filler. 

Filler. 



After all 18 sectors are written, approximately 500 bytes of 4E will have to be 
written, so format your buffer with about 600 bytes of FF just to be safe. 

The 'Sector Name Byte' is the byte actually used in naming that sector. Model 
III TRSDOS uses sector names from 1 to 18. Other DOS's use to 17. You could 
name the sectors in sequential order (such as 0, 1, 2, 3, etc.), but to speed-up sector 
accessing when doing sequential sector reads, the sector names should be 
staggered. I recommend staggering the sector names this way: 0, 6, 12, 1, 7, 13, 2, 
8, 14, 3, 9, 15, 4, 10, 16, 5, 11, 17. This interlace technique allows more time for the 
DOS and/or programs to perform calculations before the next sector is accessed. In 
most cases, all 10 sectors can be accessed in 3 revolutions of the disk. It might 
otherwise take 20 revolutions because the programs were not quick enough to 
'catch' the next sector as it was coming around. 
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The 'Sector Length Computation' byte is used by the controller to determine 
how many bytes of data are in the sector. Using the IBM (normal TRSDOS) 
format, sector lengths of 128, 256, 512 and 1024 bytes can be achieved by using 0, 
1, 2 and 3, respectively, for the Sector Length Computation value. There is no way 
to squeeze eighteen 512-byte sectors on a double-density track. In addition^ if you 
decide that you want to use a different sector length, you must adjust the quantity 
of initial sector data bytes to the length of the sector. You will also have to do some 
experimenting to see how many sectors of such-and-such length you can fit on a 
track. 
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Selecting a Drive 

In order to perform any disk I/O operations, the drives must first be 'selected.' 
Selecting a drive involves writing a byte (containing the proper bit turned on) to 
memory address 37E0. This memory address is linked to the disk drive select 
circuitry. After the proper drive select code byte is written to 37E0, the drive 
select circuitry inside the expansion interface fires up the disk drive motors and 
selects the proper drive. The drive that's selected is determined by the bits set in 
the drive select code byte that was written to 37E0. Figure 2.1 displays the 
bit-to-drive relationship in selecting a drive. Since TRSDOS calls the drives: 0, 1, 
2, and 3, and you are most likely used to calling them by those names, I will also 
refer to the drives that way. 



Figure 2.1 Drive Select Bits 



ieifkieici;ieieicicie:kie-k'k-k-ki: DRIVE SELECT BITS ********************* 



76543210 



Selects Drive 
Selects Drive 1 
Selects Drive 2 
Selects Drive 3 

Bits 4-7 Unused 
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For example, if you wrote a 02 to 37E0, this would fire all the drive motors, 
select the second drive in the system and reset the not ready bit in the Status 
Register, Software may test the 'not ready' bit to see if the drives are still rotating. 
In TRS-80 Model I system, the 'not ready' bit does not really mean that a drive is 
in or out of the system. In many systems the 'not ready' bit is used to test whether 
a selected drive is on the system. Don't ask me why the designers at Tandy didn't 
design the Model I to act this way. Anyway, when all the drives stop rotating, the 
'not ready' bit will be set high again. 

Every time a drive is selected, the motors of all the drives in the system are fired 
up, and the desired drive is selected. But keep in mind, this condition will only last 
for about 2.5 to 3 seconds. In order to keep the desired drive selected, and the 
motors running, when doing large amounts of data I/O or head-positioning 
functions that would last for more than 2.5 seconds, you must re-select the drive 
about every 2.5 seconds. Also, keep in mind that you may re-select a drive as often 
as you wish without any harmful effects to the function the controller is currently 
performing. You can verify that a drive has been selected by simply looking at the 
drive's select-indicator-light on the front of the selected drive's case. This is 
usually a red light-emitting diode (LED). The way your software can check to see 
if a drive is on the system will be discussed later in this chapter. 

If a given drive is already selected, and you want to select another one, you don't 
have to wait until the drive motors stop. Just write a byte to 37E0 with the proper 
bit set (as shown in Fig. 2.1) for the drive you want to select. You will see the 
select-indicator light go out on the first one, and the new drive's select-indicator 
light will come on. 

You could select more than one drive at a time by writing a byte to 37E0 that 
contains the select bits for all drives to be selected, but this is useless because none 
of the disk functions v/ill work properly. This should never be done. 

Reading the Selected Drive's Status 

You may get the selected drive's status by performing a read from the memory 
address 37EC, which is linked to the Status Register. Below are all the possible 
conditions of the Status bits during or after a Type I command (which is any head 
movement) or before any diskette I/O command is executed. 



Figure 2.2 Status Bits During Type I Command 



2 10 



L 



Busy - operation in progress 
Index hole is over sensor 
Head is at track 0. 
CRC error during track verify. 
Track not verified. 
Head loaded - see text 
Write protected diskette. 
Not Ready - drive motors off. 
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Hello, is Anybody Home? 

Bit — The busy bit (0) means there is an operation in progress. For 
example, if you selected a desired drive and issued a RESTORE 
command (which restores the selected drive's head to track zero), you 
would not want to issue another command, such as the SEEK 
command (which positions the selected drive's head over a desired 
track) until the restore was completed. Your software should test the 
busy bit cohtinuously until it goes to 0. Then you may issue the next 
command. 

Bit 1 — When this bit is set, the index hole punched in the diskette is 
letting light pass through to the index sensor. This bit is useful in 
software for determining whether or not a selected drive is connected 
to the system. 

Bit 2 — This bit is set when the read/write head is positioned over 
track zero. 

Bit 3 — This bit is set if a CRC error was encountered when the 
controller read a sector ID in order to verify the track position. 

Bit 4 — This bit is set if the track verification produced a verify bad 
condition. In other words, the head didn't end up on the desired track, 
or if it really did end up on the right physical track but the track byte 
in the sector ID was not correct, this too would cause a bad verify 
condition. 

Bit 5 — This bit is set when the head is loaded. This means the head 
is pushed closer to the diskette than normal so the drive can read or 
write some data. In this system, this particular bit is ignored because 
the currently selected drive's read/write head is always loaded 
immediately. 

Bit 6 — This bit is set if the diskette in the selected drive has a 
write-protect tab on it. When a diskette has a write-protect on it, it 
cannot be written to. 

Bit 7 — This is the *not ready' bit. This bit set means that all the 
drive motors are not rotating. 

Hello, is Anybody Home? 

Sometimes the need arises to determine whether or not a drive is hooked up to 
the system, or if a diskette is in the selected drive. This can be accomplished by 
testing the selected drive's index hole in a timed loop. If, in a given amount of time, 
the index bit never came on, we know that the drive is not there. If, within a given 
amount of time the index bit is always on, we know that the drive is there, but there 
is no disk in it. But if we test the index bit for a given amount of time and it toggles, 
we know that the drive is on the system, a diskette is placed inside of it, the drive 
door is shut and we may access the disk (assuming it is formatted properly). 

In order to determine how long to test the index bit with our software, we must 
know how often the index hole passes the index hole detector. 

Even I can figure out that if the diskette is rotating at the rate of 300 RPM 
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Hello, is Anybody Home? 



(revolutions per minute), we can determine how many times the index hole aligns 
with the index hole detector by dividing 300 RPM by 60 seconds. What did you 
get? My calculator tells me that the index hole comes around 5 times per second. 
Did you understand the equation? Good. Let's continue. 

Below is an assembly listing of a routine that returns with the carry flag set if the 
currently selected drive is not on the system or a diskette is not in it. The carry flag 
is reset if the drive is connected to the system, and a disk is properly mounted in 
it. 



Figure 2.3 Carry Flag Set Routine 



*********************************************************** 
** CHECK 'ON-LINE' STATUS OF A DRIVE ** 



LD 


A,0D0H 


LD 


{37ECH) ,A 


LD 


A,2 


LD 


(37E0H) ,A 


LD 


BC,2000H 



/•Controller Reset Cmd 

;Clear Existing Status. 

; Select Code for Drive 1 

/•Select Drive 

; Number of Times to Test 

; Index Hole - Aprx. 1/4 Sec. 

***************************** *******^^^^^^^^^^^^^^^^^^^^^^^ 

** This Series of Loops/Calls Checks for the Index ** 

** Flag Status to Change, ** 

************************************^^*^^^^^^^^^^^^^^^^^^^^ 



LI 



L2 
L3 



CALL 


TEST 


JR 


NZ,L1 


CALL 


TEST 


JR 


Z,L2 


CALL 


TEST 


JR 


NZ,L3 


XOR 


A 



RET 



;Test Index Bit 

;Loop if Index Bit Set. 

;Test Index Bit 

;Loop if Index Bit is Reset 

;Test Index Bit 

;Loop if Index Bit Set 

;Reset Carry Flag - Drive is 

; On-line, a Disk is in it 

; and the Door is Shut. 

; Return From Test 



** Subroutines L1-L3 Call This TEST Routine. This ** 

** Routine Checks BC for Zero. If BC = Then That Means ** 
** Tnat One of the L1-L3 Calls Kept Looping and Exausted ** 
** ^^' ^^^ ^" Error Return is Generated. Otherwise the ** 
Index Bit is Tested and the Routine Returns to L1-L3, ** 
************************************************************ 

Listing Continued . . . 
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Continued Listing 




TEST 


DEC 




LD 




OR 




JR 




SCF 


- 


PO^ 




RET 


Tl 


LD 




BIT 




RET 



BC 
A,C 
B 
NZ,T1 



BC 



A, (37ECH) 
1,A 



Hello, is Anybody HonK 



Dec Test Counter 
Get LSB of Counter 
Test if BC=0 
Go if Counter Not zero 
Set Error Flag 

Drive is Not Ready 
Kill Internal Call from 

LI, L2, or L3 
Return to Original Caller 
Get Controller Status 
Test Index Bit 
Return to LI, l2 or L3 
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Model III Supplement to Chapter 2 

Selecting Model III Drives 

Port F4 is used in selecting the desired drive similar to the memory address 
37E0 on the Model I. This port is also used in selecting other disk related features 
(see the following list). All bits are assumed in the 1 state. 



Figure 2.4 Port F4 Bit Summary 

Port F4 Bit Summary. 

Bit Use 

7 Select Double-density. 

6 Generate Data Waits. 

5 Set Write Precomp. 

4 Select Side 1. (Special Hardware) 

3 Select Drive 3. (Same as Model I) 

2 Select Drive 2. (Same as Model I) 

1 Select Drive 1. (Same as Model I) 

Select Drive 0. (Same as Model I) 



Bit 7 is used in selecting the desired density of operation. Writing a bjrte to Port 
F4 that has bit 7 set will cause the double-density mode to be invoked until a b3rte 
that has this bit reset is written — which causes single-density to be invoked. 

Bit 6 is used to enable Z-80 waits during data I/O. This can be used during sector 
I/O or track I/O (formatting) to prevent lost data errors. This eliminates time 
wasted checking for data requests and busy during data I/O, thus eliminating lost 
data errors. 

When the Vait bit' is set while selecting a drive, the Z-80 will go into a memory 
wait state when trying to fetch the next instruction from memory (the next Ml 
cycle). This condition will be terminated when one of the following conditions 
occurs: 

1. If an FDC interrupt request is generated after a function is finished. 

2. If an FDC data request occurs. 

3. If the reset button is pressed. 

4. If the Z-80 is in the wait state for more than 1024 microseconds 
(1.024 milliseconds). This last termination is provided so that no 
chance of memory loss occurs due to insufficient memory refresh. How 
all this applies to disk I/O will be explained in the Chapter 4 
supplement. 

Bit 5 causes 200-microsecond write pre-compensation to occur during data 
writes. This should be set when writing to track 22 and above when in 
double-density mode. 
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Checking The Oii-Line Status 

Bit 4 is potentially useful for selecting the second side of a drive; however, Tandy 
does not support dual-sided drive operation as of this writing. 

Bits 3 through are used in the same manner as the Model I. These are used to 
select the desired drive. Every time a drive is selected, the byte used for selecting 
must also contain the desired bits se^ to invoke the above options. This takes a 
little more programming than the Model I, but it is much more versatile. 

The following is an example of selecting drive 0, with double-density set. 



LD 
OUT 



A,81H 
(0F4H) ,A 



; Drive code, and DDEN 
; Select drive 



Checking The On-Line Status 

To check whether the drive is on-line with a "disk inserted in it, you may use the 
following program. 



Figure 2.5 On-Line Drive Status Routine 



************************************************************ 
** CHECK ON-LINE DRIVE STATUS ** 

************************************************************ 



LI 
L2 
L3 



LD 

OUT 

LD 

OUT 

LD 

CALL 

JR 

CALL 

JR 

CALL 

JR 

XOR 

RET 



A,0D0H 

(0F0H) ,A 

A,l 

(0F4H) ,A 

BC,2400H 

TEST 

NZ,L1 

TEST 

Z,L2 

TEST 

NZ,L3 

A 



FDC Reset Command 

Reset FDC. Puts FDC in Mode 1. 

Select Code for Drive 

Select Drive 

# of Times to Check 

Get Drive Status 

Loop if Index Hole Detected. 

Get Drive Status 

Loop if Index Hole Not Detected 

Get Drive Status 

Loop if Index Hole is Detected. 

No Error 

Return 



************************************************************ 
** Subroutines LI, L2 and L3 Call This Routine to Get the ** 
** Index Hole Detection Status. NZ Returned Means the ** 
** Index Hole is Being Detected. Otherwise Z is Set. ** 
************************************************************ 



TEST 



DEC 


EC 


LD 


A,C 


OR 


B 


JR 


NZ,TEST1 


POP 


BC 


SCF 




RET 





.•Decrement 'Status Test" counter, 

;Get LSB of Counter. 

;Is BC Zero? 

;no. Get Status and Return. 

; Clear Call from LI r L2 or L3 . 

; Carry Set Means Drive Not Ready 

/Return to caller 

Listing Continued . . . 
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Checking the On- Line Status 



. . Continued Listing 






TESTl 


IN 


A, (0F0H) 




BIT 


1,A 




RET 





;Get FDC Status. 

;Test Index Hole Sense, 

;Return to Llr L2 or L3 
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Type I Commands — Head positioning 

This chapter deals with the drive's read/write head positioning commands that 
are issued to the controller's Command Register via 37EC. Head movement 
operations position the selected drive's read/write head over the various tracks of 
data. 

These head positioning commands are referred to as Type I commands and 
include the RESTORE, SEEK, STEP, STEP-IN, STEP-OUT and FORCE 
INTERRUPT commands. All of these Type I commands, except the FORCE 
INTERRUPT command (which resets the FDC), contain a parameter called the 
STEPPING RATE field, which is represented by rl and rO in the command format 
diagrams as bits 1 and 0. This field determines how many miUiseconds the 
controller should delay after each head movement before resetting the Busy flag in 
the Status Register, or issuing another step pulse (depending on the operation). 
This delay allows the currently selected drive's read/write head to stabilize over 
each track before performing data transfers or issuing another head movement 
pulse. After performing an operation that steps the read/write head just once, the 
Busy flag in the Status Register does not get reset until the specified delay is 
finished. 

Figure 3.1 depicts the 4 possible stepping delay values. These two bits are set 
accordingly in the Type I command byte that is issued to the Command Register 
via 37EC. 



Figure 3.1 Stepping Delay Values 

Bit 1 Bit Stepping Delay Between STEPs in Milliseconds 

6 

1 12 

1 20 

1 1 40 (Normal TRSDOS rate) 
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The read/write head-stepping mechanism in the older Radio Shack disk drives 
made by Shugart (SA-400), can only handle the slow 40-millisecond rate, but other 
drives, such as the MPI, Vista, Tandon, or the newer Radio Shack disk (Tandon 
design) drives, can handle the much faster 6-millisecond rate (see the 'stepping 
rates' chart in the back of the book). , 

All of the Ty)pe I commands use bit 3 as the Head Load flag in the command byte 
that's issued to the controller via 37EC. It will be represented as the *H' field in 
each of the Type I command format diagrams. In other systems, the Head Load bit 
is set if the read/write head is to be LOADED (moved closer to the diskette in 
preparation to read or write data to the diskette) at the beginning of the command. 
The Head Load bit is reset in the command b3i;es if the head is not to be loaded at 
the beginning of this command. 

The Head Load bit can usually be ignored in the normal Model I system because 
the selected drive's head is always loaded right after being selected, and on some 
drives (Uke the Tandons) the head is loaded when the drive door is shut. You might 
ask, "Why is this Head Load function in the controller in the first place?" One 
reason is that when doing head movement, it is not necessary to load the head until 
a data transfer is to take place. It takes approximately 10 milliseconds for the 
drive's read/write head to stabilize after loading it. Anyway, you can ignore this bit 
in this system because the read/write head is always loaded in the selected drive. 
The Head Load feature was built into the controller primarily for the use with 
8-inch drives, because in 8-inch drive systems, the diskettes are constantly 
rotating. This could cause undue wear on the drive's read/write head if it were 
always loaded. 

All the Type I commands, except the FORCE INTERRUPT command, use bit 
2 of the command issued to the controller as the Verify flag. This is denoted as *V' 
in the command format diagrams. If this bit is set in the command bjrte, the 
controller will verify this particular Type I command. In other words, it will verify 
that the head is over the track contained in the Track Register. 

When a verify is to take place, the first encountered sector ID is read from the 
diskette. The track byte from the sector ID is compared to the value in the Track 
Register. If there is a match and no CRC error occurred when reading the sector ID, 
the verify is OK and the operation is completed with no error bits set in the Status 
Register. If the track in the sector ID that was read from the diskette does not 
match the value in the Track Register, and the CRC of the ID was valid, an 
interrupt is generated, the Seek Error bit is set, and the Busy bit is reset in the 
Status Register. If the track in the sector ID that was read for the diskette does 
match the value in the Track Register, but the CRC of the ID was bad, the *CRC 
Error' bit in the Status Register is set, and the next encountered sector ID is read 
for verification. If an ID field with a valid CRC cannot be found within 2 diskette 
revolutions (400 milliseconds), the controller terminates the operation, generates 
an interrupt, and sets the CRC Error bit in the Status Regsiter. 
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Figure 3.2 Flow Diagram of a Verify 



SET 

CRC ERROR BIT 3 

IN STATUS 

REGISTER 




SET 

SEEK ERROR BIT4 

IN STATUS 

REGISTER 
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The STEP-IN Command 

When the controller receives the STEP-IN command, it steps the selected drive 
once in the direction of the highest numbered track. For example, if the head was 
positioned over track 17 and you issued the STEP-IN command, the controller 
would position the read/write head one track higher, making the read/write head's 
new position track 18. 

After a delay determined by the stepping rate field is done, a verification takes 
place if the *V' flag was set in the command byte. An interrupt is generated at the 
end of this command. 

Below is the format for the STEP-IN command. 



Figure 3.6 STEP-IN Format 



Bit: 



6 


5 


4 


3 


2 


1 





1 





U 


H 


V 


rl 


r 



Bits 7-5 tell the controller this is the STEP-IN command. 

Bit 4 is the Update Track Register flag. 

Bit 3 is the Head Load flag. 

Bit 2 is the Verify flag. 

Bits 1 & are the Stepping Rate field. 

For example, issuing the STEP-IN command with the format of 01010111 
binary, or 53 would be interpreted by the controller as follows: 

1. This is the STEP-IN command. 

2. Do not load read/write head at the start of the RESTORE 
operation. 

3. Do not verify the restore with a sector ID from the new track 
position. 

4. Update the Track Register by adding one to the current value. 

5. Step head in one track toward the highest number track and delay 
40-microseconds before resetting Busy and terminating operation. 
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The STEP-IN Command 



Figure 3.7 STEP-IN Flow Diagram 



f ENTER } 



RESET 

ERROR FLAG IN 

STATUS REGISTER 




UNLOAD HEAD 



SET DIRECTION 
FOR "STEP-OUT" 



SET DIRECTION 
FOR "STEP-IN" 




ISSUE STEP PULSE 
TO DRIVE 



I 



ADD 1 TO 
TRACK REGISTER 



DELAY 

ACCORDING TO 

■■STEP RATE" BITS 




SEE VERIFY 

PROCEDURE ON 

PAGE 37 



RESET BUSY. 

SET INTRQ, 
DONE 
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The STEP-OUT Command 



Figure 3.8 Drive STEP-IN Routine 



it* 



START 



LI 



BUSY 



lr*4r**4 


t************ 


ample 


Of stepping 


'i******'k*ie1t***1,*** 


LD 


A,l 


LD 


(37E0H),A 


LD 


B,10 


CALL 


BUSY 


LD 


A,53H 


LD 


(37ECH) ,A 


PUSH 


HL 


POP 


HL 


PUSH 


HL 


POP 


HL 


CALL 


BUSY 


DJNZ 


LI 


RET 




LD 


A,(37ECH) 


RRCA 




RET 


NC 


JR 


BUSY 



in Drive 0's Head 10 Times, ** 
********************** *****yt^^^ 

; Drive Zero Select Code 

;Select Drive 

;# of Times to Step-in 

; Check if Controller Busy 

; Step-in, Update Track Reg. 

; No Verify, 40 Ms Delay 

; Issue Command 

;Let Controller Set Up 



;Call Until Step-in is Done 

;Do Ten Times 

; Return to Caller 

;Get Controller Status 

; Shift Busy into Carry Flag 

;Ret If Not Busy 

;Loop Till Not Busy 



The STEP-OUT command 

The STEP-OUT is almost identical to the STEP-IN command except that the 
read/write head of the selected drive is moved out one track toward track 0. 

Below is the format for the STEP-OUT command. 



Figure 3.9 STEP- OUT Format 



Bit 



6 
1 



5 

1 



4 
U 



3 
H 



2 

V 



1 
rl 



r0 



For example, issuing the STEP-OUT command with the format of 01110000 
bmary, or 70 would be interpreted by the controller as follows: 

1. This is the STEP-OUT command. 

2. Do not load read/write head at the start of the RESTORE 
operation. 
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The STEP-OUT Command 



Figure 3.10 STEP-OUT Flow Diagram 



SET DIRECTION 
FOR "STEP-IN" 



f ENTER ] 



RESET 

ERROR FLAG IN 

STATUS REGISTER 




LOAD HEAD 



SET DIRECTION 
FOR "STEP-OUT" 



ISSUE STEPPULSE 
TO DRIVE 



I 



DELAY 

ACCORDING TO 

■'STEP RATE" BITS 




RESET BUSY, 

SET INTRO, 

DONE 



UNLOAD HEAD 




ADD 1 TO 
TRACK REGISTER 



:;=r 



SEE VERIFY 

PROCEDURE ON 

PAGE 37 
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The STEP Command 



3. Do not verify the RESTORE with a sector ID from the new track 
position. 

4. Update the Track Register by adding one to the current value. 

5. Step head out toward track and delay 6-milliseconds before 
resetting the Busy flag an4 terminating operation. 



Figure 3.11 Drive 1 STEP- UT Routine 



******************************************************** 

** Demo of Stepping Drive One's Head Out 13 Times. ** 
*************************** **************^**^^^^^^^^^^^^ 



LI 



BUSY 



LD 


A,2 


LD 


(37E0H) ,A 


LD 


B,13 


CALL 


BUSY 


LD 


A,73H 


LD 


(37ECH) ,A 


PUSH 


HL 


POP 


HL 


PUSH 


HL 


POP 


HL 


CALL 


BUSY 


DJNZ 


LI 


RET 




LD 


A, (37ECH) 


RRCA 




RET 


NC 


JR 


BUSY 



Drive 1 Select Code 
Select Drive 1 
# of Times to Step-out 
Check if Controller Busy 
Step-out, Update Track Reg. 

No Verify, 40 Ms Delay 
Issue Command 
Let Controller Set Up 



;Call Until Step-in is Done 

;Do Ten Times 

;Return to Caller 

;Get Controller Status 

; Shift Busy into Carry Flag 

;Ret if Not Busy 

:Loop Till Not Busy 



The STEP Command 

The STEP operation is similar to the STEP-IN or STEP-OUT command, but 
It causes the controller to STEP the selected drive's read/write head one track in 
the last direction stepped, whether it was in or out. For example, if the head is 
positioned over track 19 and you issue a STEP-IN command, the controller will 
position the head over track 20. Now if you issue a STEP command, the controller 
will move the head one step in the last direction stepped, so it will now be 
positioned over track 21. 
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The STEP Command 



Figure 3.12 iSTEP Flow Diagram 



i ENTER j 

_3Z 



RESET 

ERROR FLAG IN 

STATUS REGrSTEP ' 




UNLOAD HEAD 



SET DIRECTION 
FOR "STEP-OUT? 




ADD 1 TO 
TRACK REGISTER 



SET 

STEP DIRECTION 
TO 'IN- 



SET 

STEP DIRECTION 
TO 'OUT 



ISSUE STEP PULSE 
TO DRIVE 



DELAY 

ACCORDING TO 
"STEP RATE" BITS 




SEE VERIFY 

PROCEDURE ON 

PAGE 37: 



RESET BUSY. 

SET INTRO. 

DONE 
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The STEP Command 



Below is the format for the STEP command* 



Figure 


3.13 


STEP Format 




















Bit 


7 


6 


5 


4 


3 


2 


1 

















l' 


U 


H 


V 


rl 


r0 



For example, issuing the STEP command with the format of 00100000 binary, 
or 20 would be interpreted by the controller as follows: 

1. This is the STEI? command. 

2. Do not load read/write head at the start of the RESTORE 
operation. 

3. Do not verify the STEP with a sector ID from the new track 
position. 

4. Update the Track Register by adding or subracting the appropriate 
value to the current value in the Track Register. 

5. Delay 6-miUiseconds before resetting the Busy flag and terminating 
operation. 



Figure 3.14 Drive 2 STEP Routine 



*********:fe**4:*4r***:fc**************4r*******«*** *********** 

** Here is an Example of Performing a STEP * 

** Operation 3 Times on Drive 2, * 

**************************************4::K.:N.A*:lt*4r************** 



^L 



START 



LI 



BUSY 



LD 


A, 4 


LD 


(37E0H) ,A 


LD 


B,3 


CALL 


BUSY 


LD 


A,20H 


LD 


{37ECH) ,A 


PUSH 


HL 


POP 


HL 


PUSH 


HL 


POP 


HL 


CALL 


BUSY 


DJNZ 


LI 


RET 




LD 


A, (37ECH) 


RRCA 




RET 


NC 


JR 


BUSY 



Drive 2 Select Code 
Select Drive 2 
# of Times to Step 
Check if Controller Busy 
STEP, No Track Reg Update 
No Verify, 6 Ms Delay 
Issue Command 
Let Controller Set Up 



;Call Until Step is Done 

;Do Ten Times 

/•Return to Caller 

;Get Controller Status 

; Shift Busy into Carry Flag 

;Ret if Not Busy 

;Loop Till Not Busy 
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The SEEK Command 



The SEEK Command 

This is the most powerful head positioning command the controller has. What 
this command does is position the read/write head of the currently selected drive 
to the track contained in the Data Register. Before issuing the SEEK command, 
the Track Register must contain thepelected drive's current track position. Then 
write to the Data Register (via 37EF) the track you want to position the head over. 
Now issue the SEEK command. The controller will step the read/write head in the 
proper direction until the contents of the Track Register are equal to the desired 
track you wrote to the Data Register. Updating is automatically done to the Track 
Register, and you have no control over this. Verification is done if the 'Y flag is set 
An interrupt is generated at the completion of this command. 

Below is the format of the SEEK command. 



Figure 3. 16 SEEK Format 



Bits 



7 


6 


5 


4 


3 


2 


1 











1 


H 


V 


rl 



r0 



Bits 7-4 tell the controller this is the SEEK command. 

Bit 3 is the Head Load flag (unused). 

Bit 2 is the Verify flag. 

Bits 1 and are the stepping rate field. 

For example, issuing the SEEK command with the format of 00010111 binary, 
or 13 would be interpreted by the controller as follows: 

1. This is the SEEK command. 

2. Do not load read/write head at the start of the RESTORE 
operation. 

3. Verify the STEP with a sector ID from the new track position. 

4. Delay 40-milliseconds between each stepping pulse before resetting 
the busy flag or terminating operation when done SEEKing. 



Figure 3.17 Drive SEEK Routine 



** Example of Using the SEEK Command on Drive 0. A ** 
** Restore is Executed First So We Know What Track ** 
** the Head is Over Before Issuing the SEEK Command. ** 

Listing Continued . . . 
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The SEEK Command 



Figure 3.15 SEEK Flow Diagram 



[ ENTER j 



RESET 
STATUS REGISTER 
ERROR FLAGS 




LOAD HEAD 



UNLOAD HEAD 




DONE. 

RESET BUSY, 

SET INTRO 



* ( DONE J 



SET DIRECTION 

FOR "STEP-IN", 

ADD 1 TO 

TRACK REGISTER 



SET DIRECTION 
FOR "STEP-OUr, 
SUBTRACT 1 FROM 
TRACK REGISTER 




ISSUE 
STEP 
PULSE 



DELAY 

ACCORDING TO 

"STEP-RATE" BIT 

IN CMD REGISTER 
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The FORCE INTERRUPT Command 



Continued Listing 






START 


LD 


A,l 




LD 


(37E0H) ,A 




CALL 


BUSY 




LD 


A,3 




LD 


(37ECH) ,A 




PUSH 


HL 




POP 


HL 




PUSH 


HL 


f 


POP 


HL 




CALL 


BUSY 




XOR 


A 


* »> 


LD 


(37EDH) ,A 




LD 


A,13H 




LD 


(37ECH) ,A 




PUSH 


HL 




POp 


HL 




PUSH 


HL 




POP 


HL 




CALL 


BUSY 


f 


RET 




BUSY 


LD 
RRCA 


A, (37ECH) 




RET 


NC 




JR 


BUSY 



Drive Select Code 

Select Drive 

Make Sure Controller is 

Not Busy 
Restore at 40 Ms Rate 
Issue Command 
Let Controller Respond to 

Restore Command 



Wait Till Done 

Clr A 

Ld Track Reg With Current Tk 

SEEK Command 

Issue Command 

Wait for controller 



;Wait Till Done 
;Return to Caller 
;Get Controller Stat 
;Put Bit into C Flag 
;Ret if Not Busy 
/'Loop Till Not Busy 



The RESTORE function will automatically update the Track Register to 0, but 
I did it too, to illustrate how the Track Register must be loaded with the read/write 
head's current track position before issuing the SEEK command. 

The FORCE INTERRUPT Command 

This command is used to terminate the current operation being executed by the 
controller. It is good practice to do this before and after any disk READ or WRITE 
is performed, in order to reset the controller. 

After issuing the FORCE INTERRUPT command to the controller via the 
Command Register at 37EC, the current function will be terminated, and Busy 
will be reset. 



Figure 3.18 Forced Termination Routine 



** Example of a Forced Termination. ** 



START 



LD 
LD 

RET 



A,0D0H 
(37ECH) ,A 



; Force Interrupt Command 
; Issue Force Int Command 
;Ret 
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Model III Head Positioning 



Model III Supplement to Chapter 3 



Model III Head Positioning 

Head positioning on the Model III is handled the same way as the Model I, 
except the addresses used are ports and not memory locations. Also, Unless you 
want to branch to a NMI routine after an FDC function is done, you must turn off 
the NMI options. 

Below is an example of a RESTORE operation on a Model III. 



Figure 3.19 Model III Restore Routine 



**** ie* ** rk ****** liie* ******** -k * iclcicii-kl: is ie** ******************** is* 

** Restore a Drive's Head to Track ** 

************************************************************ 



START 



BUSY 



DELAY 



CALL 

XOR 

OUT 

LD 

OUT 

LD 

OUT 

CALL 

IN 

RRCA 

RET 

JR 

EX 

EX 

EX 

EX 

RET 



BUSY 
A 

(0E4H) ,A 
A,l 

(0F4H) ,A 
A 

(0F0H) ,A 
DELAY 

A, (0F0H) 

NC 
BUSY 
(SP) ,HL 
(SP) ,HL 
(SP) ,HL 
(SP) ,HL 



Make Sure Controller is Not Busy 

A=0 

Turn Off NMI Options 

Drive Select Code 

Select Drive 

Restore Cmd @ 6 Ms Step Rate 

Issue Restore 

Wait for Controller to React 

Before Testing 
Get FDC Status, 
Shift Busy into Carry. 
Return if Not Busy 

Else Loop. 
Waste Time 



; Return 
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Disk Data Input/Output Commands 



This chapter deals with the controller commands used in reading and writing 
data to the diskette. Data I/O techniques will be discussed in Chapter 5, where I 
guide you through the sector I/O driver called 'DISKIO/ASM.' 

Programmed I/O 

In some computer systems, including the Model II, data input and output 
(called I/O) is done by DIRECT MEMORY ACCESS (DMA). This means that the 
software tells the controller what operation is to be done, how many bytes are to be 
transferred, and where in memory the data is to be written to or read from (called 
a 'buffer'). But the Direct Memory Access Controller actually performs the 
operation and reads/writes directly to/from memory the bytes involved without 
the Z-80's help. No software is required to get or put a byte each time one is needed. 

The two main advantages of Direct Memory Access are the extremely fast 
transfer potential and the simplicity of the software required to run it. 

The TRS-80 Model I does its disk I/O by a method called 'Programmed I/O.' 
The name is such because the 'program' (or software) handles the transfer of each 
individual byte into, or out of the data I/O buffer. 

When an operation is to be done, the software tells the controller what operation 
is to take place. When a byte is to be read or written, the controller sets a 'DATA 
REQUEST (DRQ)' flag or bit in its Status Register. The software must test this 
flag at regular intervals, in some form of loop, in order to know when a byte is to be 
read or written. The Busy bit must also be tested to determine when the operation 
is completed. 

In read operations, when the DRQ flag is set, the Data Register contains the byte 
just read from the disk. The software reads this byte from the Data Register. 

In a write operation, the software supplies the Data Register with the next byte 
to be written to the disk. 
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If the software fails to keep up with the Data Request Bit, the Lost Data bit is 
set in the Status Register, fuid the operation j g^ rminated. ^ 

In order to determine whether a command may be given to the controller, or to 
tell whether a current command is finished, you must check the Busy flag in the 
Status Register. 



Figure 4. 1 Busy Test Routine 



*************leli*iciclc**ic****************************1c1cii1c***1t*1c 

** Here is an Assembly Source of a Typical Busy Test Loop ** 



LOOP 



LD 


A, {37ECH) 


RRCA 




RET 


NC 


JR 


LOOP 



;Get Status from otatus Reg, 
; Shift Busy into Carry 
;Return if Not Busy 
;Try Until Not Busy 



It could also be done this way. 



START 


LD 


HL,37ECH 


LOOP 


BIT 


1,(HL) 




JR 


NZ,LOOP 




RET 





;Cind/stat Register Location 
;Test Busy Bit 
;Loop if Busy 
;Ret 



Or you might want to read the status into *A' to test other status conditions. 



Figure 4.2 Status Test in A Register 

START LD 
LOOP LD 
BIT 
JR 
BIT 

RET 
JR 


HL,37ECH 
A, (HL) 
IrA 

NZ,LOOP 
7, A 

NZ 
LOOP 


;Cind/stat Register 

;Get Status 

;Test Busy 

;Go if Busy 

; Check for Not Ready - Drive 

; Motors Off 

;Ret if Motors Off 

;Get Status Again 
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Programmed I/O 



Yes, I know I should have just tested the Not Ready bit without testing the Busy 
bit, but I just wanted to point out that you may address the controller's register 
addresses in any legal Z-80 way. 

What the last routine did was: 



Figure 4.3 Status Test Loop 



START 1. Load HL With the Controller's Status Register, 

LOOP 2, Read the Status into the A Register. 

3, Jump to LOOP if Controller was Busy, 

4, Jump to LOOP if Drive Motors are Still On. 

5, Return. 



As described in Chapter 2, you must convert a logical drive number into its select 
code. In other words, the select codes for drives 0, 1, 2 and 3 are 1, 2, 4 and 8 
respectively. 

Here is a routine that will take the logical drive number in the B Register (0 to 
3) and convert it to its Drive Select Code that will be written to the drive select 
latch at 37E0. 



Figure 4.4 Drive Select Code Routine' 



** Routine to Convert a Drive to its Select Code. ** 



START 



LOOP 



EQU 


$ 


INC 


B 


LD 


A,80H 


RLCA 




DJNZ 


LOOP 


RET 





;B = Drive 0,1,2 or 3 

;Make B = 1,2,3 or 4 

;This Byte Gets Shifted 

; Shift A Left 1 (See Z-80 Man) 

;Do Until B = 

; Return with Converted Value in 

; the A Register. 



Do you remember (in Chapter 2) when we discussed how each bit in the drive 
select latch is related to each drive? If you are unsure, re-read that section. 
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The Read Address Command 



The Read Address Command 

When a diskette is formatted, each sector on any given track has a 6-byte header 
called the Sector Address or Sector ID. This is used by the controller to determine 
over what sector the head of the selected drive is about to be positioned. These 
sector address bytes contain the tracfk number, sector name, bjrte length of sector, 
and a CRC of all these. You may read these bytes by issuing a READ ADDRESS 
command to the controller. 

When the controller receives a READ ADDRESS command the Busy bit in the 
Status Register is set, and the next encountered Sector Address is read from the 
disk. The Data Request bit is set in the Status Register for each byte to be read (a 
total of six). 

This is the order of the data bytes that are read by your software: 



Figure 4.5 Status Register Data Bytes 



Byte Purpose 



1 
2 
3 
4 

5-6 



Track number - This is the track the sector is on. 

Side number (usually 1 in TRSDOS) - can be ignored. 

Sector name 00-FF. 

Sector length - used by the controller in determining how many bjrtes 

long the sector is. 

Two CRC bytes - Used in checking parity. 



You may wish to read the next encountered address to determine what track the 
head is over on a particular drive. 

The READ ADDRESS command is CO. 

An example of a READ ADDRESS operation for drive is given below. 



Figure 4.6 Drive Select Routine 



** Select Drive & Init Data Buffer That ** 
** Address is to Be placed in ** 



STARr 



LD 


A,l 


LD 


(37E0H) ,A 


LD 


BC, BUFFER 



CAfiL 



BUSY 



;For Drive 

; Select 

;6 Byte Buffer to Store Bytes 

; That are Read from Disk 

;Make Sure Controller is Not 

; Busy 

Listing Continued . . . 
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The READ TRACK Command 

Continued Listing 

****1i1i*ick*1t*******************ieisis***1c** ******** If******** 

** Issue Read Address Command & wait ** 

** for Controller to Respond ** 

******************************************************** 

LD A,0C0H ;Read Address Command 

LD (37ECH) ,A'r3> ; Issue Command to Controller 

PUSH HL t| ;Wait for Controller 

POP HL '0 

PUSH HL ]' 

POP HL ^ 

******************************************************** 

** Data Request Loop. Check for Byte to Get ** 

** and if Operation is Done ** 

******************************************************** 

LOOP LD A, {37ECH) Jh ;Get Stat 

BIT ■ 1,A *£ ; Check Data Request 

JR NZ,GET i^^^ ;Go if Byte Ready 

RRCA 1 ;Put Busy in Carry Flag 

RET NC vl-S^-^fl ;Ret if Not Busy, Read Done 

JR LOOP i^ ;Loop Back 

******************************************************** 

** Address Data Byte Transfer ** 

******************************************************** 

GET LD A, (37EFH) 1^ ;Get Byte from Data Reg 

LD (BC) ,A J ;Store in Buffer 

INC BC ^ ;Bump Buffer Pointer 

JR LOOP <?» ;Go Test Again 

*******************************************************^ 

** Busy Test Loop ** 

******************************************************** 

BUSY LD A, (37ECH) 13. ;Get Stat 

RRCA iM ; Shift Busy into Carry 

RET NC irT-^s^li .Ret if Not Busy 

JR BUSY »2. ;Loop Till Not Busy 



The READ TRACK Command 

This command allows you to read an entire track of data, not just the user data, 
but every byte on it. It will dump all the overhead bytes used by the controller, plus 
the user data we call Sectors. Here is a situation in which this function could be 
useful: You just got VTOS 3.0, and you soon discover that sector 4 on track just 
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The READ TRACK Command 



can't be read. Well, I've heard some people say that this sector was left 
unformatted. "Nonsense," I exclaim! When the diskette was formatted, Mr. Cook 
simply named this sector something other than a normal 0-9 sector name (when 
formatting you may name your sectors anything you want from 00-FF). I think it 
was 7C or something like that. Regardless, all you have to do is read the entire 
track and look toisee what that rasc&l was named. Also, I think M.S. Adventure 
does this to all of the sectors of their adventures so you can't copy the diskette with 
your operating system, nor can you 'superzappers' go looking through it. As a 
matter of fact, the track names on M.S. Adventures are different from normal too. 
That screws up the read/write head seeking if you verify your seeks. It's simple — 
just read the track, and you'll be able to see every single byte on it. 

The READ TRACK command is E4. 

Below is an example of a READ TRACK operation. 



Figure 4.7 READ TRACK Routine 



iilslilililililclilsliltliltlililililtlileiililililtlclilslililflilcliltltlililtltlilcis************ 

** Select Drive, Init Buffer to Put Track Data. ** 

** Test for Busy and Issue Command ** 



START 



LOOP 



GET 



BUSY 



LD 
LD 
LD 

CALL 

LD 

LD 

PUSH 

POP 

PUSH 

POP 

LD 

BIT 

JR 

RRCA 

RET 

JR 

LD 

LD 

INC 

JR 

LD 

RRCA 

RET 

JR 



A,l 

(37E0H) ,A 
BC, BUFFER 

BUSY 
Ar0E4H 
(37ECH) ,A 
HL 
HL 
HL 
HL 

A, (37ECH) 
1/A 
NZ,GET 

NC 

LOOP 

A, (37EFH) 

(BC) ,A 

BC 

LOOP 

A, (37ECH) 

NC 
BUSY 



;For Drive 
; Select It 

; Start of Buffer to Put Track 
; Bytes That are Read 
'■^ ;Make Sure Controller Not Busy 
;Read Address Command 
; Issue Command 
;Wait for Controller 



i3> 
IT. 



Get Stat 

Check Data Request 

Go if Byte Ready 

Put Busy in Carry Flag 

Ret if Not Busy, Read Done 

Loop Back 

Get Byte from Data Reg 

Store in Buffer 

Bump Buffer Pointer 

Go Test Again 

Get Stat 

Shift Busy into Carry 

Ret if Not Busy 

Loop Till Not Busy 
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The WRITE TRACK or FORMAT Command 

Formatting is just the opposite of reading a track. This is the command used in 
preparing a diskette for use. In this operation the creation and naming of sectors 
and tracks takes place. 

The controller starts writing the form?it data as soon as the next Index Pulse is 
encountered. It keeps on writing until the Index Pulse is encountered again. See 
Chapter 1 for how your data must be set up for a track write. 

It's possible you may never want to use the format operation, because under 
most conditions the TRSDOS, VTOS and NEWDOS formatters will work just 
fine, unless you want to name the sectors or tracks somthing non-standard or use 
a different sector length to link 128-b3rte sectors. There is a formatter program in 
the back of the book you may study and customize. 

The WRITE TRACK command is: F4 



Here is an example of writing a track: 



Figure 4.8 WRITE TRACK Routine 



** Select Drive and Init Data Buffer Pointer Start ** 



LD 


A,l 


;For Drive 


LD 


(37E0H) ,A 


; Select 


LD 


HL,37ECH 


;Cmd/Stat Register 


LD 


BC, BUFFER 


; Start of Buffer That Contains 
; All the Necessary Bytes 


CALL 


BUSY 


;Make Sure Controller is Not 
; Busy 



** Issue Cmd and Get First Byte to Write ** 



LD 

LD 



LD 
INC 



A,0F4H 
(37ECH) ,A 



A, (BC) 
BC 



;Write Track/Format Cmd 

; Issue Command 

;The PUSH/POP Wait is 

; Unnecessary When Formatting 

;Get Next Byte to Write 

;Bump Buffer Pointer 



** Data Request Test Loop ** 



LOOP 



BIT 


1,(HL) 


JR 


NZ,PUT 


BIT 


0f(HL) 


RET 


NC 


JR 


LOOP 



; Check Data Request 

;Go if Byte Ready 

; Check if Write is Done 

;Ret if Not Busy^ Read Done 

;Loop Back \ 

Listing Continued . 
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READ SECTOR Command 

. . . Continued Listing ^ , , 

********************************************************** 

** Transfer Data Byte to Data Register ** 

********************************************************** 

PUT LD (37EFH) ^A ;Write Byte 

;Buinp Buffer Pointer 
;Get Next Byte to Write 
;Go Test Again 

********************************************************** 

** Busy Test Loop ** 

********************************************************** 



LD 


(37EFH) ,A 


INC 


BC 


LD 


A, (BC) ' 


JR 


LOOP 



BUSY 


BIT 


0r(HL) 


;Busy? 




RET 


Z 


;Ret if Not Busy 




JR 


BUSY 


;Loop Till Not Busy 



Read Sector command 

This is the command issued before reading a sector. If the sector is not found 
within two revolutions of the diskette, the Sector Not Found bit is set, and the 
operation is terminated. 

This is the format for the READ SECTOR command. 



Figure 4.9 READ SECTOR Format 



Bit 7 6 5 4 3 2 1 

1 B E 



Load Head at Start, 
IBM Format. 



As in all TRS-80 Model I disk operations, the *Load Head At Start' bit can be 
ignored because the head is loaded when a drive is selected. 

The 'IBM Format' bit will be discussed in the section on formatting. This bit is 
normally set during this operation. 
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READ SECTOR Command 

The usual byte issued is 88. 

Before issuing the READ SECTOR command, the Track Register must contain 
the current track that the selected drive is positioned over. If it does not, the Sector 
Not Found bit will be set when the operation terminates. 

If you don't know what track th^ head is over, you can perform a READ 
ADDRESS and get the track from that. Then load it into the Track Register. 



Figure 4. 10 READ SECTOR Routine 

*************************-k**iclci(1cicic**is***-k***ic** ************* 

** Example of Reading a Sector. ** 

*****************************i,ititicitiiiiic4,iii,igiii,^i,i,^^^,^^^^^^^^^^^ 



START LD 


A,l 


LD 


(37E0H) ,A 


LD 


BC, BUFFER 


CALL 


BUSY 


LD 


A,88H 


LD 


(37ECH) ,A 


PUSH 


HL 


POP 


HL 


PUSH 


HL 


POP 


HL 



;For Drive 

; Select 

;256 Byte Buffer to Store 

; Data That is Read from Disk 

;Make Sure Controller is Not 

; Busy 

;Read Address Command 

; Issue Command 

;Wait for Controller 



************************************* 1c1cic-k*.kii.)c*************** 

** Data Request Test Loop ** 

**************************************ic*i,i,i,i;ii^ic1,iii,i,^i,1,1,^^^,^^ 

LOOP 



LD 

BIT 

JR 

RRCA 

RET 

JR 



A, (37ECH) /S ;Get Stat 

If A (z ;Check Data Request 

NZ,GET 4^>-^ }Z ;Go if Byte Ready 

H /Put Busy in Carry Flaq 

NC i^ -^ l\ ;Ret if Not Busy, Read'Done 



LOOP 



xt 



;Loop Back 



*************************************ii1iif1f4,1:1,i,1,1,1,1,^,^,^,^^^^^^^^ 

** ^^ Data Transfer Routine ** 

**************************************iti,i,i:i,i,i,4,i,ti,4.i,^,^^,^^^^^^^^^ 

GET LD A,(37EFH) iS ;Get Byte from Data Reg 

LD (BC) ,A > ;Store in Buffer 

INC BC ^ ;Bump Buffer Pointer 

JR LOOP 1^ ;Go Test Again 

******************************************1,4f1,ii1,if1,1fif1f1,1,4,f,^,^,^^ 

** Busy Test Loop ** 

****************************************i,**i,4,1cit1,1,^1,1,i,^^,^,^^,^,^ 

BUSY LD A,(37ECH) l5 ;Get Stat 

RRCA w ; Shift Busy into Carry 

RET NC 4sr-^)J ;Ret if Not Busy 

JR BUSY 12- ;Loop Till Not Busy 
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Write Sector Command 

This is the command issued before writing a sector. If the sector is not found 
within two revolutions of the diskette, the Sector Not Found bit is set, and the 
operation is terminated. 

As with the sector read, before issuing the WRITE SECTOR command, the 
track register ;nMS* contain the current track that the selected drive is positioned 
over. If it does not, the Sector Not Found bit will be set when the operation 
terminates. 

As previously stated, if you do not know what track the head is over, you can 
perform a READ ADDRESS and get the track from that. Then load it into the 
Track Register. This is the format for the WRITE SECTOR command 



Figure 4. 1 1 WRITE SECTOR Format 



Bit 



7 


6 


5 


4 


3 


2 


1 





1 





1 





B 


E 

L 


Al 


A2 



Load Head at Start, 
IBM Format. 



As in all TRS-80 Model I disk operations, the Load Head At Start bit can be 
ignored because the head is loaded when a drive gets selected. 

The IBM Format bit will be discussed in the section on formatting. This bit is 
normally set during this operation. The Al and A2 bits are for record type. When 
writing a sector, sometimes it is desirable to give it some sort of attribute that the 
software could test to determine if the sector is 'special.' This is done on the DOS's 
directories to let DOS know these sectors are special-purpose sectors. Your 
controller does not care what you use your special sectors for. Technically, the 
attribute is called Record Type. The way these bits (0 and 1) are set in the 
command byte (when you issue the Write Sector command) will be duphcated in 
bits 5 and 6 of the Status Register after you read the sector. All your software has 
to do is test these bits for whatever condition you want. Pretty shck huh? 
TRSDOS, NEWDOS and VTOS all use bit 5 (A2) for their Read Protect status." 
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WRITE SECTOR Command 



figure 4.12 WRITE SECTOR Routine 



** Write a Sector Routine ** 

*************************** j************^**^*^^*^^^^^^^^^^^^ 



;For Drive 

;Select 

;256 Byte Buffer That has 

; Data to be Written 

;Make Sure Controller is Not 

; Busy 

;Write Sector Command 

; Issue Command 

;Wait for Controller to Set Up 



START LD 


A,l 


LD 


{37E0H) ,A 


LD 


BC, BUFFER 


CALL 


BUSY 


LD 


A, 0A8H 


LD 


(37ECH) ;a 


PUSH 


HL 


POP 


HL 


PUSH 


HL 


POP 


HL 



*****************************************************ie****** 

** Data Request/Busy Test Loop ** 

LOOP 



; Byte 



LD 

BIT 

JR 

RRCA 

RET 

JR 



A, (37ECH) 

IfA 

NZ,PUT 



NC 
LOOP 



;Get Stat 

; Check Data Request 

;Go if Controller Wants a 

;Put Busy in Carry Flag 
;Ret if Not Busy, Read Done 
;Loop Back 



****************************is*lc***************1c************* 

** Data Transfer Routine ** 



GET LD A, (BC) 

LD (37EFH) ,A 

INC BC 

JR LOOP 



;Get Byte from Buffer 
; Transfer to Controller 
;Bump Buffer Pointer 
;Go Test Again 



************************************************************ 
** Busy Test Loop ** 



BUSY 



LD 
RRCA 
RET 
JR 



A, (37ECH) 

NC 
BUSY 



;Get Stat 

;Shift Busy into Carry 
;Ret if Not Busy 
;Loop Till Not Busy 
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Model III Supplement To Chapter 4 

The FDC data I/O commands are the same for the Model III, except that ports 

are used (remember?), and the NMI and wait state options are used. Single- density 

disk VO on the Model III doesn't require waits, but it doesn't hurt This means 

you could have a disk I/O routing that handles single- and double- density. The 
program in the supplement to Chapter 5 has just this sort of routine. 

The NMI Post I/O Processing Routine 

Since we are going to use the NMI option, we need a routine to use for a 
demonstration. The NMI vector at 4049 must contain a jump to this routine 
before the examples in this chapter can be used. Also, turn off the NMI when doing 
head movement; it's unnecessary. Turn on the NMI option just before doing I/O. 

Store the jump instruction at 4049- 404B. 



Figure 4.13 


Vector Jump Routine 






XOR 


A 


;A = 




OUT 


(0E4H) ,A 


?Turn NMI Off 




LD 


A,0C3H 


;JP Opcode 




LD 


(4049H) ,A 


; Store Jump 




LD 


HL,NMIRTN 


;NMI Routine Address 




LD 


(404AH) rHL 


; Store NMI Routine Address 



Below is the NMI routine. 


Figure 4.14 NMI Routine 






NMIRTN EQU 


$ 




POP 


HL 


;Kill Ret Adr (See Text) 


IN 


A, (0F0H) 


;Get FDC Status 


LD 


E,A 


;E = FDC Status 


IN 


A, (0E4H) 


;Get NMI Status 


PUSH 


AF 


;Save on Stack 


XOR 


A 


;A = 


OUT 


(0E4H) ,A 


;NMI Options Off 


POP 


AF 


;Get NMI Status 


AND 


64 


; Drives Time Out? Bit 6 


RET 




;Ret with NZ = No Time Out 
;Z = Time Out Occured 
;E Register = FDC Status 
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Notice the POP HL at the beginning? When a non-maskable interrupt occurs, 
it's just like forcing a CALL to location 66. So, naturally, the RET address of the 
I/O loop is still on the stack. The instruction at 66 jumps to another ROM routine 
which checks for the reset button being pressed. If the reset button is not pressed, 
it jumps to 4049, where our NMI routine vector is located. We don't want to 
return to the I/O loop that was interrupfted. We want to return to the routine caller, 
so we simply pop off the loop return address. This makes the caller's return 
address our return address. 

The Model III Read Address Command 

The read command is identical to the Model I read command; however, we 
handle the I/O differently. 

Below is an example READ ADDRESS routine. Call with C = select code for 
drive, i.e. 1, 2, 4 or 8 for drives 0, 1, 2 and 3 respectively. This routine assumes the 
desired drive is already selected. 



Figure 4.15 READ ADDRESS Routine 



START 


LD 


A,0C0H 


',h = NMI Options 




OUT 


(0E4H) ,A 


?NMI Options On 




LD 


A,C 


rGet Drive Select Code 




OR 


128+64 1 


rAdd Double-dens Select and 




LD 


D,A 


f Z-80 Wait Select 




LD 


HL, BUFFER i 


rHL-> Buffer to Receive Data 
', Sector ID 




LD 


C,0F3H 


rC-> Data Register 




LD 


^ E,2 ; 


iData Request Mask 




XOR 


A 1 


rA = 




OUT 


(0E0H) ,A 1 


^Disable Normal Interrupts 




DI 








LD 


A,0C0H i 


rRead Address Command 




OUT 


(0F0H) ,A 1 


; Issue Command 




CALL 


DELAY i 


1 Delay a Few Microseconds 


INIT 


IN 


A, (0F0H) ] 


iGet FDC Status 




AND 


E , 


fData Ready? 




JR 


Z,INIT 


rNo - Loop 




INI 




iMove Data to Buffer 


LOOP 


LD 


A,D 1 


r Select Drive, Dden and Wait 




OUT 


(0F4H),A ) 


; See Text 




INI 




(Move Data to Buffer 




JR 


LOOP 1 


(Loop Till NMI Interrupts 


DELAY 


EX 


(SP),HL i 


iWait for FDC to Respond 




EX 


(SP) ,HL 






EX 


(SP) ,HL 






EX 


(SP) ,HL 






RET 
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When the drive is selected at LOOP, with the wait-state option selected, the 
Z-80 freezes at that point until data is ready. The reason we used the INIT loop is 
that if no data were found (no disk in the drive) the Z-80 wait at LOOP would 
re-start after 1.024 milliseconds and erroneous data would be transferred from the 
FDC. 

The Model III Read Track Command 

The READ ADDRESS routine in the previous section can be used with the 
READ TRACK command; just change the command byte from a OCO to a OEO. 
It will work just fine. 

The Model III Write Track (Format) Command 

The READ ADDRESS routine can also be use^^for the WklTE TRACK 
function. Just change the command byte to an OFO, and change the INI opcodes 
to OUTI opcodes. The buffer that HL points to must have the entire track format 
laid out. 

The Model III Read Sector Command 

The READ ADDRESS routine can be used for the READ SECTOR function if 
the head is on the desired track, and the track and sector registers contain the 
desired sector. Use 80 as the command byte. 

The Model III Write Sector Command 

The READ ADDRESS routine can be used for the WRITE SECTOR function 
if the head is on the desired track, and the track and sector registers contain the 
desired sector. Use GAG as the command b5rte for normal sectors, and GAl for 
READ PROTECT sectors. Also, substitute the INI opcodes for OUTI opcodes. 
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DISKIO - Full Sector I/O Routine 

This chapter contains a full sector (IBM format) I/O driver, and it is 
Bomb=prGGf. It will Never hang-up for any reason. Feel free to use this routine 
in any programs that you use or distribute. 

It will handle head positioning with full error-checking. The error codes 
returned are TRSDOS-compatible error codes, except for error 39, which means 
'Drive Not Ready.' You can key this into your editor/assembler for use in your 
programs. By carefully studying each aspect of the driver, you'll gain a more 
complete understanding of the operations involved. 

The write a sector entry is at line 00630 at the WRITE label. The write a 
protected sector routine starts at line 00610 at the PROT label. Read a sector 
starts at hne 00670 and has the label of READ. 

These routines preserve all registers, so you won't have to save them yourself. 
The register format before calUng is as follows: 



Figure 5,1 Full Sector I/O Driver Routine 



ENTRY: 

L = Drive number 0-3, 
E = Sector. 
D = Track. 
BC = The 256-byte I/O buffer that data will 
be written to or read from. 

EXIT: 

All registers the same, except that 'A' 
contains the error code. Zero flag = no error. 

Listing Continued . . . 
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. . . Continued Listing 




00260 


DCT 


EQU 


$ 


00265 








00270 








00280 




DEPB 





00290 




DEFB 


1 


00300 




DEFB 





00310 




DEFB 


3 


00320 




DEFB 





00330 








00340 




DEFB 


1 


00350 




DEFB 


2 


00360 




DEFB 





00370 




DEFB 


3 


00380 




DEFB 





00390 








00400 




DEFB 


2 


00410 




DEFB 


4 


00420 




DEFB 





00430 




DEFB 


3 


00440 




DEFB 





00450 








00460 




DEFB 


3 


00470 




DEFB 


8 


00480 




DEFB 





00490 




DEFB 


3 


00500 




DEFB 





00510 








00520 


BUFF 


DEFW 





00530 


TSQ 


DEFW 





00540 


TRIES 


NOP 




00550 








00560 








00570 


SAVER 


DEFW 





00580 








00590 


TRYS 


EQU 


3 


00600 









DRIVE CONTROL TABLES 
SEE TEXT AFTER DRIVER 

DRIVE NUMBER 
SELECT CODE 
DRIVE STATUS, BIT REC 
DRIVE STEP RATE 
CURRENT TRACK 

DRIVE #1 
SELECT CODE 
DRIVE STATUS 
DRIVE STEP RATE 
CURRENT TRACK 

DRIVE # 2 
SELECT CODE 
DRIVE STATUS 
HEAD STEP RATE 
CURRENT TRACK 

DRIVE #3 
SELECT CODE 
DRIVE STATUS 
HEAD STEP RATE 
CURRENT TRACK 

I/O BUFFER 
TRK & SECTOR 
COUNTER FOR COUNTING 

# OF TIMES TO TRY I/O 
AFTER ERROR OCCURS 
USED TO STOR HL TEMP - 
BY REGS SAVE ROUTINE 

# OF TIMES TO TRY I/O 
UNTIL ROUTINE GIVES UP 



*** FUNCTION ENTRIES *** 



*** WRITE A PROTECTED (DIR TYPE) SECTOR ** 



00610 PROT LD A,0A9H 
00620 JR WRl 



;FDC COMMAND 
/CONTINUE 



*** WRITE A NORMAL SECTOR *** 



00630 


WRITE 


LD 


A,0A8H 


00640 


WRl 


PUSH 


HL 


00650 




LD 


HL,0012H 


00655 








00660 




JR 


TASK 






*** 


READ A SECTOR *** 



;FDC COMMAND 
;SAVE DRIVE (L) 
; OPCODES: LD A, (BC) 
;& LD (DE) ,A 



Listing Continued . 
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. . . Continued Listing 






00670 


READ 


EQU 


$ 




00680 




LD 


A,88H 


fREAD CMD 


00690 




PUSH 


HL 


fSAVE DRIVE/OP 


00700 




LD 


HL,021AH 


; OPCODES: LD A, (DE) 


00710 








;& LD (BC) ,A 






*** DOMINANT controller'' 


k** 


00710 


TASK 


LD 


(XFER),HL 


;XFER Z-80 OPCODES 


00720 




LD 


(BUFF) ,BC 


fSAVE I/O BUFF POINOJER 


00730 




LD 


(TSQ) ,DE 


?SAVE TRACK, SECTOR #'S 


00740 




LD 


(ISSUE+1) ,A 


f STORE FDC COMMAND 


00750 




POP 


HL 


fGET DRIVE NUMBER 


00760 




CALL 


FPUSHX 


;SAVE ALL REGISTERS 


00770 




LD 


A,TRYS 


;GET # ERR TRIES 


007 80 




LD 


(TRIES) ,A ' 


? STORE IN COUNTER 


00790 




LD 


Ar0D0H 


f FORCE INTERRUPT CMD 


00800 




LD 


(37ECH) ,A 


f RESET FDC 


00810 




CALL 


GETDCT 


?GET CONTROL TABLE PTR 


00820 




JR 


Q31 


?CONT 






*** PUT 


DRIVE CONTROL TABLE POINTER IN 'lY' *** 


00830 


GETDCT 


EQU 


$ 




00840 




PUSH 


BC 


?SAVE REGISTERS 


00850 




PUSH 


HL r 

b,l\ — 


;BC & HL 


00860 




LD 


?GET DRIVE # 


00870 




T.D 


HL,DCT 


?GET DRIVE TABLE START 


00880 


ZZ4 


INC 


B 


?IS B ZERO YET? 


00890 




DEC 


B 


?SET Z IF SO 


00900 




JR 


NZ , ZYX 


?N0, NOT DONE 


00910 




PUSH 


HL 


FXFER DCT PTR TO REG lY 


00920 




POP 


lY 


rGET DCT 


00930 




POP 


HL 


; RESTORE REGS HL 


00940 




POP 


BC 


; AND BC 


00950 




RET 




? RETURN 


00960 


ZYX 


LD 


DE,5 i 


fADD FOR NEXT TABLE 


00970 




ADD 


HL,DE 


?BUMP TO NEXT DCT 


00980 




DEC 


B 1 


fDEC DRIVE NUMBER COUNT 


00990 




JR 


-ZZ4 j 


f CONTINUE 


01000 








f 


01010 


Q31 


CALL 


TASKl ; 


•,D0 WRITE OR READ 


01020 




LD 


(HL) ,0D0H j 


; RESET FDC 


01030 




LD 


A,E 1 


IGET ERROR CODE 


01040 




OR 


A I 


ISET Z OR NZ FLAG 


01050 




RET 


1 
i 


•RETURN TO CALLER 






*** ACTUAL I/O HANDLER ** 


■* 


01060 


TASKl 


LD 


HL,37ECH ; 


FDC COMMAND/STATUS REG 


01070 




CALL 


SELECT ; 


SELECT DRIVE 


01080 




BIT 


6,(IY+2) 


IS DRIVE DISABLED? 


01090 




JR 


Z,TH3 ; 


NO, CONTINUE 


01100 


NRER 


LD 


E,27H 


NOT READY ERROR CODE 



Listing Continued . 
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. . . Continued Listing 
01110 DEFB 

01120 WPD LD 

01130 RET 



1 (V) ^-5 ^C^° ;PROT REG 
E,15 



01140 


TH3 


BIT 


0,(iy+2) 


01150 




JR 


NZ,TH5 


01160 




LD 


Ar60H 


01170 




OR 


(IY+3) 


01180 




LD 


B, 80 


01190 


FGN 


CALL 


SELECT 


01200 




LD 


(HL),A 


01210 




CALL 


WAIT 


01220 




BIT 


2,(HL) 


01230 




JR 


NZ,II5 


01240 




DJNZ 


FGN 


01250 




JR 


NRER 


01252 








01260 


115 


SET 


0,(IY+2) 


01270 




LD 


{iy+4),0 


01280 


TH5 


LD 


A,(ISSUE+1) 


01290 




CP 


88H 


01300 




JR 


Z,TH6_^ 


01310 




BIT 


6,(H10 


01311 






S- 


01320 




JR 


NZ,WPD 


01330 




BIT 


4,(iy+2) 


01340 




JR 


NZfWPD 


01350 








01360 


TH6 


LD 


DE, (TSQ) 


01370 




LD 


(37EEH),DE 


01380 




LD 


(HL) ,0D0H 


01390 




LD 


A,(IY+4) 


01400 




LD 


(37EDH) ,A 


01410 




CALL 


SELECT 


01420 




LD 


A,10H 


01430 




OR 


(IY+3) 


01440 




LD 


(HL),A 


01450 




CALL 


DELAY 


01460 


JPZ 


CALL 


SELECT 


01470 




BIT 


0,(HL) 


01480 




JR 


NZ,JPZ 


01490 


VBX 


LD 


A, (37EDH) 


01500 




LD 


(IY+4),A 


01510 


REDO 


EQU 


$ 


01520 




LD 


(HL) ,0D0H 


01530 




T.D 


BC, (BUFF) 


01540 


REOl 


LD 


DE,37EFH 


01550 




CALL 


SELECT 


01560 




DI 




01570 


ISSUE 


LD 


(HL) ,0 


01^^ 




CALL 


DELAY 


01590 


lOLOO 


T.D 


A, (BC) 
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WRITE PROTECT ERROR 
RETURN 

IS DRIVE INITIALIZED? 
YES, SKIP INIT PROCESS 
•STEP OUT' COMMAND 
OR WITH STEP RATE 
MAX TRACKS POSSIBLE 
SELECT DRIVE 
ISSUE STEP OUT CMD 
WAIT FOR. DONE 
DRIVE AT TRACK YET? 
YES. INIT DONE. 
ELSE CONT STEP OUT 
ERROR IF DIDN'T REACH 
TRACK AFTER 80 STEPS 

SET INIT BIT IN DCT 
MAKE CURRENT TRACK=0 

;GET TYPE, READ/WRITE. 
IS IT READ SECTOR? 
GO IF READ 

DRIVE WRITE PROTECTED? 
WITH TAB OVER SLOT? 
YES, GO TO ERROR 
DRIVE LOGICALLY PROT? 
YES, GO TO ERROR 

D=TRACK, E=SECTOR 

STORE IN FDC REGS 

RESET FDC 

CURRENT TRACK FROM DCT 

FDC TRACK REGISTER 

SELECT DRIVE 

SEEK CMD 

ADD STEP RATE BITS 

ISSUE SEEK COMMAND 

DELAY 

SELECT DRIVE 

SEEK DONE? 

NO, LOOP 

GET CURRENT TRACK 

STORE IN DRIVE'S DCT 



; RESET FDC 

;GET BUFFER POINTER* 

;DATA REGISTER 

; SELECT DRIVE 

; DISABLE INTERRUPTS 

; ISSUE COMMAND PUT HERE 

; DELAY BEFORE TESTING 

;GET BUFFR CHR (WRITES) 

Listing Continued . 
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01600 




JR 


DI02 


01610 


XFR 


EQU 


$ 


01620 


XFER 


LD 


(DE) ,A 


01630 




NOP 




01635 








01640 




INC 


BC 


01650 




LD 


A,(BC) 


01660 


DI02 


BIT 


1,(HL) 


01670 




JR 


NZ.XFR 
0r(HL) 


01680 




BIT 


01690 




JR 


Z,ENDP 


01700 




BIT 


1,(HL) 


01710 




JR 


NZ,XFR 


01720 




BIT 


7,(HL) 


01730 




JR 


Z,DI02 


01740 


ENDP 


LD 


A, (HL) 


01750 




EI 




01760 




LD 


B,A 


01770 


RNAL 


RLCA 




017 80 




JP 


C,NRER 


01790 




RLCA 




01795 








01800 




JR 


C, ERROR 


01810 




RLCA 


^^ 


01815 








01820 




JR 


C, ERROR L 


01830 




LD 


A,B 


01840 




LD 


E,0 


01850 




AND 


ICH 


01860 




RET 


Z 


01870 


RNALY 


LD 


HL, TRIES 


01880 




DEC 


(HL) 


01890 




LD 


A,B 


01900 




JR 


Z, ERROR 


01910 




RES 


0,(IY+2) 


;T0 CAUSE RE- 


-SEEK 




01920 




JP 


TASKl 


01930 


ERROR 


LD 


A, (ISSOB+l) 


01940 




CP 


88H 


01950 




LD 


A,B 


01960 




JR 


NZ,ERR2 


01970 




LD 


E,3 


01980 




DEFB 


1 


01990 


ERR2 


LD 


E,ll 


02000 




RRCA 




02010 




RRCA 




02020 




RRCA 




02030 




RET 


C 


02040 




INC 


E 


02050 




RRCA 




02060 




RET 


C 


02070 




INC 


E 


02080 




RRCA 




02090 




RET 


C 



;TEST FOR DATA REQUEST 



; WRITE CHAR 
;NOP ON WRITES, 

LD (BC) ,A ON READS 

BUMP BUFFER POINTER 

GET NEXT BUFFER CHR 

DATA REQUEST? 

YES, GET/PUT BYTE 

FULL SECTOR XFERED? 

YES, GO END PROCESS 

DATA REQUEST? 

YES, TRANSFER BYTE 

DRIVE NOT READY? 

NO, LOOP 

GET FDC STATUS 

ENABLE INTERRUPTS 

SAVE ERROR CODE 

DRIVE NOT READY? 

YES, GO TO ERROR 

WRITE PROT (WRITE) , 

SEC PROT FLAG? (READ) 

YES, DON'T RETRY I/O 

HARDWARE FAULT (WRITE) 
J SECTOR IS PROT? (READ) 
;YES, DON'T RETRY I/O 
;GET FDC STATUS AGAIN. 
; CLEAR ERROR REGISTER 
;ANY ERRORS? 
;N0, RETURN 

;GET TRIES COUNTER 

;DEC VALUE 

;GET ERROR CODE 

;G0 IF 'TRIES' EXAUSTED 

; RESET INIT BIT IN DCT 01915 

;TRY AGAIN, RESEEK 

;GET FUNCTION CMD 
;WAS IT READ? 
;GET ERROR STATUS 
;G0 IF WRITE 
;READ ERROR CODE START 
;VROT E (LD BC,XX) ? 
; WRITE ERROR START 
;INIT ERROR SHIFT 



;RET IF LOST DATA 
;BUMP ERROR REG 
; PARITY ERROR 
;YES, RETURN 
;BUMP ERROR REG 
; SECTOR NOT POUND? 
;YES, RETURN 



Listing Continued . 
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. . . Continued Listing 
02100 INC E 
02110 RRCA 

; PROTECT SECTOR? (READ) 
02120 RET C 
02130 INC E 
;0R PROTECTED SECTOR 02140 
WITH ERROR 



; BUMP ERROR REG 

;WRITE FAULT (WRITE) , 02115 

;yES, RETURN 

;WRITE PROTECT DISK 02133 
I^ET ; RETURN 



*** SELECT CURRENT DRIVE *** 



02150 


SELECT 


PUSH 


AF 


02160 




LD 


A,(HL) 


02170 




PUSH 


AF 


02180 




LD 


A,(IY+1) 


02190 




LD 


(37E0H) ,A 


02200 




POP 


AF 


02210 




RLCA 




02220 




JR 


C,JKQ 


02230 


JJJ 


POP 


AF 


02240 




RET 




02250 


JKQ 


PUSH 


BC 


02260 




LD 


BC,8C60H 


02270 




BIT 


5,(IY+2) 


02280 




JR 


NZ,XPI 


02290 




LD 


B,46H 


02300 


XPI 


CALL 


60H 


02310 




POP 


BC 


02320 




POP 


AF 


02330 




JR 


SELECT 



;SAVE REG A 

;GET FDC STATUS 

; SAVE STATUS FIRST 

;GET DRIVE SELECT CODE 

; SELECT DRIVE 

;GET OLD FDC STATUS 

; DRIVE ROTATING ALREADY? 

;G0 IF NOT 

; RESTORE A 

; RETURN 

;SAVE BC 

;1 SEC DELAY VALUE 

;WAIT FULL SECOND? 

;YES 

;ELSE WAIT 1/2 SECOND 

; DELAY 

/RESTORE BC 

;AND AF 

;RESELECT & RETURN 



*** DELAY AFTER ISSUING FDC COMMAND ** 
*** TO ALLOW FDC TO RESPOND ** 



02340 


DELAY 


EX 


(SP),IX 


; DELAY 


02350 




EX 


(SP),IX 


; ABOUT 30 MICRO SECONDS 


02360 




RET 




/RETURN 






*** LOOPS UNTIL FDC IS 


•NOT BUSY' *** 


02370 


WAIT 


CALL 


DELAY 


; DELAY FOR FDC 


02380 


WA2 


BIT 


0,(HL) 


;IS FDC BUSY? 


02390 




RET 


Z 


;N0, RETURN 


02400 




JR 


WA2 


;LOOP TIL NOT BUSY 


02410 








• 






*** SAVES ALL REGISTERS 


ON STACK *** 


02420 


FPUSHX 


LD 


(SAVER) ,HL 


; STORE TEMPORARILY 


02430 




EX 


(SP) ,HL 


;GET RETURN ADDRESS 


02440 




LD 


(FPVEC+1),HL 


; STORE RET ADR 


02450 




PUSH 


DE 


;SAVE DE 


02460 




PUSH 


BC 


;BC 


02470 




PUSH 


lY 


;IY 


02480 




PUSH 


IX 


;ix 


02490 




EXX 




/EXCHANGE REGS Lis 
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. . . Continued Listing 




02500 




PUSH 


HL 


02510 




PUSH 


DE 


02520 




PUSH 


BC 


02530 




EXX 




02540 




LD 


HL,FPOP 


02550 




PUSH 


HL 


02560 




LD 


HL, (SAVER) 


02570 


FPVEC 


JP 









*** HANDLES DE-STfl 


02580 


FPOP 


EXX 




02590 




POP 


BC 


02600 




POP 


DE 


02610 




POP 


HL 


02620 




EXX 


V 


02630 




POP 


IX 


02640 




POP 


lY 


02650 




POP) 


BC 


02660 




POE^ 


DE 


02670 




POP 


HL 


02680 




RET 





;HL' 
;DE' 
;BC' 

; EXCHANGE BACK 

; RETURN ADR FROM ROUTINE 

; SAVE ON STACK 

; RESTORE HL'S VALUE 

; RETURN 



; SWITCH REGISTER SET 

; RESTORE BC 

;DE' 

;HL' 

; SWITCH REGISTER SET 

; RESTORE IX 

;iy 

;BC 
;DE 
;HL 
/RETURN 



The Drive Control Table 

Each of the four drives has its own 5-byte 'drive control table,' or DCT for short. 
The DCT contains information used by the controller in deciding certain 
conditions. 

DCT — Byte 

This byte contains the drive number (0-3) for the drive to which the 
DCT belongs. The DISKIO routine doesn't need this byte, but it's 
handy if you need to write a disk utility and you wish to know which 
drive the DCT pointed to by the lY Register is using. You can use the 
GETDCT routine independently of the DISKIO driver in order to get 
a DCT for your own purposes. 

DCT — Byte 1 

This byte is the 'binary select code' used in selecting the drive. This 
value will be 1, 2, 4 or 8 for drives 0, 1, 2 or 3 respectively. You can 
'fake out' the DISKIO routine by putting a different select code in this 
byte so that it really accesses another drive instead. 
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DCT — Byte2 

This byte contains a bit record of certain drive status information. 

Bit 7 means the drive has been 'initialized,' InitiaHzation simply means 
that a Head Restore to drive was done, in order to maintain the 
correct track position value. 

Bit 6 means the drive is 'logically' write-protected. This is an option 
that you may set. If this bit is set, DISKIO will reject any writes to the 
drive just as though the disk in the drive had a write protect tab on it. 

Bit 5 is unused. 

Bit 4, if set, means the driver is 'logically' turned off. You may set this 
option* If this bit is set, DISKIO will perform no sector reads or writes. 

Bit 3, when set, means DISKIO will delay 1 second after a *dry' select. 
If thiU)it is off, a 1/2 second delay is done. 

Bits 2, 1 and'O are unused. 

The I/O RE-TRIES Value 

The TRYS' value that is set to EQU 3 is the maximum number of I/O re-tries 
that DISKIO will perform after an error is encountered. DISKIO restores the drive 
head before each re-try. For Write Protect, Protected Sector or Write Fault 
errors, no re-trying is attempted. 

Explanations of I/O Errors. 

I'm sure youVe seen all the disk-related errors, but FU explain what the errors 
really mean, as well as their usual causes. 

CRC means 'Cyclic Redundancy Check, parity,' or ^Checksum.' Translated into 
plain English, this means that when the controller writes a sector, it does a 
mathmatical calculation, using all the bytes written and comes up with a two-byte 
number. The controller stores these two values right after the sector. Every time 
the sector is read, it recalculates the CRC numbers and compares them with the 
ones written on the disk. If there is a match, the controller considers the read 
successful and doesn't set the CRC error bit in the Status Register. If the values 
don't match, the controller considers the read unsuccessful and sets the CRC error 
bit. Usually a CRC error is caused by getting the disk close to a magnetic field, 
which changes some of the bits on the sector. Also, using disks that were formatted 
or written to on one drive might cause parity errors when used on another drive 
whose head is not aligned just right, thus causing a bad read of the magnetic pulses 
by the misaligned drive. 

LOST DATA is the result of software not keeping up with Data Request on I/O 
operations. On reads, if the software does not read the current byte in the Data 
Register before the next byte is ready to be put into the Data Register, the lost data 
bit is set in the Status Register. During write operations. Lost Data means the 
software did not furnish a byte fast enough when the DRQ bit was set. The 
controller writes a byte of in place of the byte that the software was supposed to 
furnish. 
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The SECTOR NOT FOUND bit is set when the desired sector was not found or 
the track byte in the sector ID did not match the value in the Track Register This 
bit will be set after two revolutions of the disk if the desired sector wasn't found. 

The WRITE FAULT bit is set when there is a problem between the drive and 
the controller. ' 

Single-byte I/O versus Sector I/O 

Sector I/O is of course, reading and writing data a sector at a time. Single-byte 
I/O is a method that allows other routines to read or write a byte at a time without 
worrying about handling the actual sector I/O. A byte I/O routine would be called 

in the same manneras the ROMkeyboard scan routine(whichinputsabyte)orthe 
display and printer routines (which output a byte). The way a byte I/O routine 
would work is that the routine' would maintain a Current Byte in Sector (CBS) 
rpomter, which is incremented every time the routine is accessed. On read 
Voperations the routme would read the next sector (whatever that happens to be) 
reset Its CBS pointer, read the current byte, increment the CBS, and return the 
byte to the caller. This will continue until the CBS is greater than the sector length 
1 hen the sequence starts again. 

Here is a DOS Boot-loader routine that loads in a machine-language file starting 
at track 0, sector 5 (usual SYSO/SYS), using byte I/O. In the sector read routine 
register E contains the sector, and 'D' contains the track ofthe sector to read The' 
loader codes used in the loading routine are standard TRSDOS object file loader 
coaes. 1 nese codes are interpreted as shown below. 

01 NN LL MM, Load at the address MMLL, the next NN bytes 
(minus two for MM and LL). 

02 02 LL MM, Transfer control to MMLL. This is called the transfer 
address, usually used for the end of file marker (EOF). 

05 NN, Skip the following NN bytes. These are header bytes that 
don't get loaded (REM function). 



Figure 5.2 DOS Boot-loader Routine 



a.^^^^ Boot loader routine ** 

mill LD^'sP^ToLu '?°^ ^^^^' ^<="^« routine 

00160 lS Dp'flS 'J"^^ ^^^^"^ to this location 
uwxoB iju L>t.,vm5H ;Sector = 5, track = 0, 

00170 Jl LD L '^t^'^^"? sector of syS0/SYS 

00180 Exx 'c^" ^^^^ counter 

£,AX ;Save regs for sector reader 

Listing Continued . . . 
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. . . Continued Listing 
************************************************************* 

** Start of Byte Accesssing ** 

************************************************************* 

Read next byte from file. 

Is it a LOAD code? 

Go if mot 

Get number of byte to load+2 

Get true amt of bytes to load 

Put in byte counter. 

Get LSB of load address. 

Put in L 

Get MSB of load address 

HL now contains load address 

Get SYS0/SYS data byte 

Transfer to memory 

Bump to next load location 

Do until B = 

Go get next loader code 

Is code the transfer address 

code? (if byte = 2 when read) 

Go if not. Must be an ignore 

Data code 

Get next transfer code. (2) 

Is it a 2? 

Go if it was 

Get no system msg 

Display error 

Get LSB^ of transfer address 

Put in L 

Get MS% of transfer address 

HL now contains transfer adr 

Jump to SYS0 

Get # of bytes to read and 

Ignore 

Put in byte counter 

Position over ROM 

Load ignore byte over ROM 

Which does nothing 

************************************************************ 

** Routine to Fetch Next Byte ** 

************************************************************ 



00190 


CALL BYTE 


00200 


DEC A 


00210 


JR NZ,XFER 


00220 


CALL BYTE 


00230 


SUB 2 


00240 


LD B,A 


00250 


CALL BYTE 


00260 


LD L.A 


00270 


CALL BYTE 


00280 


LD H,A 


00290 Rl 


CALL BYTE 


00300 


LD (HL) ,h 


00310 / 


INC HL 


00320 Vj 


DJNZ Rl. 


00330 


JR RUN 


00350 XFER 


DEC A 


00360 


JR NZrIGNO 


00370 


CALL BYTE 


00371 


CP 2 


00372 


JR Z,XFR1 


00374 


LD HL,M2 


00375 


JP PRINT 


00380 XFRl 


CALL BYTE 


00390 


LD L,A 


00400 


CALL BYTE 


00410 


LD H,A 


00420 


JP (HL) 


00430 IGNORE CALL BYTE 


00440 


LD B,A 


00450 


LD HL,0 


00460 


JR Rl 



00470 


BYTE 


EXX 


00480 




LD A,L 


00490 




OR A 


00500 




CALT, Z,GETS 


00510 




LD A,(HL) 


00520 




INC HL 


00530 




EXX 


00540 




RET 


00550 


GETS 


CALL SECTOR 


00560 




LD HL,4100H 


00570 




INC E 


00580 




LD A,E 
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Get REGS 

Get byte count 

Set z flag if L=0 

Get next sector is L=0 

Get next byte 

Bump buffer pointer 

Save regs for next time 

Return 

Get next sector 

Load with input buffer 

Bump sector 

Get next sector name 



Listing Continued . 
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. . . Continued 


Listing 


00590 


CP 1 


00600 


RET C 


00610 


LD E,0 


00620 


INC D 


00630 


RET 



;Time to bump track? 
;Ret if not 
;Keset to sector 
;Bump to next track 
; Return 

a.^a.^a.^^^^ Load Next Sector ** 



00650 

00660 

00670 

00680 

00690 

00700 

00710 

00720 

00730 

00740 

00750 

00760 

00770 

00780 LOOP 

00790 

00800 

00810 

00820 

00830 GET 

00840 

00850 

00860 

00880 DONE 

00890 

00900 

00910 

00920 

00930 

*********** 

** 

*********** 

00940 PRINT 

00950 

00960 

00970 

00980 

00990 

01000 STOP 

01002 

01010 BUSY 

01020 31 

01030 

01040 



PUSH HL 
PUSH BC 
LD HL,37ECH 
LD (HL) ,0D0H 
LD A,l 

LD (37E0H) ,A 
LD (37EEH) ,DE 
CALL WAIT 
LD (HL) ,13H 
CALL BUSY 
LD BC,4100H 
LD (HL) ,88H 
CALL WAIT 
BIT 1, (HL) 

JR NZ,GET 

BIT 0,(HL) 

JR Z,DONE 

JR LOOP 

LD A, (37EFH) 

LD (BC) ,A 

INC BC 

JR LOOP 

LD A, (HL) 

POP BC 

POP HL 

AND ICH 

RET Z 

LD HL,DISKE 



;Save register 

; Controller command/status reg 

;Reiset controller 

fSelect code for drive 

yRe-select the drive 

;Load controller with sector & track 

;Let controller react 

; Issue the seek command 

;Wait for seek to finish 

;Load with input buffer 

; Issue the sector read command 

;Let controller react 

/•Byte in data reg? 

;Go if byte ready 

;Read done? (not busy) 

;Go if read done 

;Lopp back 

;Read byte for data register 

; Store in input buffer 

;Buhip buffer pointer 

/•Loop back 

;Get controller status 

;Restore registers 

;Strip out errors 

;Ret if no error 

/•Get DISK ERROR message 



Message Printer ** 



LD A, (HL) 
INC HL 
OR A 

JR Z/STOP 
CALL 33H 
JR PRINT 
CALL 49H 
JP 0DH 
CALL WAIT 
BIT 0,(HL) 
RET Z 
JR Bl 



;Get message byte 

;Bump message pointer 

/•Set z if A = 

;Go if end of message 

; Display byte 

/• Loop 

/•Wait for a keyboard input 

/•Jump to BASIC bootstrap loader 

;Let controller react 

/•Is controller busy? 

;Ret if not busy. 

;Loop 

Listing Continued . 
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. . . Continued Listing 

** Controller Delay Routine ** 

01050 WAIT PUSH HL ;Lets controller react 

01060 POP HL 

01070 PUSH HL 

01080 POP HL ' 

01090 RET 

****** *********************************^*^^^^^^^^^^^^^^^^^^^^ 
** Disk Error Message Text ** 

01100 DISKE DEFM 'DISK ERROR" ;Disk error message 
01110 NOP ;Print delimiter 



Notice in the GETS subroutine that every time *E' (the sector counter) reached 
10, it was reset to zero, and *D' (the track counter) was bumped up one. 

This routine assumes the machine-language program being looked for starts at 
track 0, sector 5. Also, all of the program's sectors must be consecutive. 

This routine is very similar to how the DOS's system file overlay (SYSl, SYS2 
etc . . .) loader works, except that the overlay loader checks the directory to see 
where on the disk an overlay starts. 
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Model III Supplement To Chapter 5 

This supplement contains a Model III disk driver which handles sector reads 
and writes. It can read and y/rite single or double density, but does not 
automatically recognize density. Selecting density is done by changing a bit in the 
Drive Control Table (DCT). 

The DCT 

The DCT is located on line 00630. There is a DCT for each drive. The DCT 
contains information needed for efficient disk I/O. 

Below is a list of the DCT bytes and their use. 



vjFigure5.3 DCT Bytes 



BYTE USE 

7 Drive current density^ l=Double 

6-4 Unused 

3-0 Drive select code^ i.e 0001 = drive 0, 
0010 = drive 1, etc. 

1 Drives current track, 

2 Drive status 

7 0=Drive needs head restore. 
6-0 Undefined, You may use these. 



Byte is simply the drive's select code with the density bit in bit 7. This makes 
sense, since bit 7 is the bit used in selecting density via port F4. 

Byte 1 is the drive's current track. This allows the Track Register to be loaded 
with the correct value before SEEKing is performed. 

Byte 2 is a status byte. The only bit currently used is bit 7. If this bit is off, the 
drive needs to be INITIALIZED. Initializing a drive consists of restoring the head 
to track and updating byte 1 of the DCT to 0, then setting bit 7 of DCT byte 2. 
This allows the disk I/O routine to then know exactly where the head is. This is 
usually done only once, before the first I/O is attempted for a given drive. Certain 
disk errors cause the initialization to be done again. 

Using The Disk Drive in a Program 

To incorporate this disk driver into a program, simply type it into a TRS-80 
compatible editor/assembler (such as Radio Shack, Apparat, Assem/80, or 
EDAS). 
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Below is the register format for routine entry. 



Figure 5.4 Register Entry Format 



C = Drive number 

D = Track number 

E = Sector number 

HL -> Buffer for data I/O. 



READ SECTOR 

WRITE SECTOR 

WRITE PROTECTED SECTOR 



CALL READ, line 00680 
CALL WRITE, line 00730 
CALL PROT, line 00780 



Model III Disk Driver Routine 



Figure 5.8 Model III Disk Driver Routine 





00040 ; 
00060 ; 


DISKIO 


, DISK ROUTINES 


FOR MODEL III 




00070 CMD 


EQU 


0F0H 






00080 TRK 


EQU 


0F1B 






00090 SEC 


EQU 


0F2H 






00100 DATA 


EQU 


0F3H 






00110 SEL 


EQU 


0F4H 






00120 INT 


EQU 


0E0H 






00130 NMI 


EQU 


0E4H 






00140 TRIES 


EQU 


5 






00150 ; 










00160 TAS 
00170 BUFF 
00180 TRIC 
00190 ; 


DW 
DW 
NOP 






; STORAG 

; BUFFER STO 

;# I/O ATTEMPTS COUNTER 




00200 SELECT 


IN 


A, (CMD) 


;GET STAT 




00210 

ft n ^ <\ rt 


PUSH 


AP 


;SAV STAT 




00220 
00230 


LD 
OUT 


A, (IX) 
(SEL) ,A 


;GET CURRENT SEL COD 
; SEL 




00240 
00250 
00260 


POP 

RLCA 

RET 


AF 

NC 


;GET STAT 
/•DRIVES SEL? 




00270 


LD 


BC,2000H 


; DELAY 




00280 SI 
00290 


DEC 
LD 


BC 
A,B 


;DEC COUNT 




00300 


OR 


C 






00310 


JR 


NZ,S1 


;NOT DONE 




00320 


JR 


SELECT 


; RES EL, RET 

Listir^ Continued . . . 
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. . Continued Listing 



00330 


• 








00340 


DELAY 


EX 


(SP) ,HL 




00350 




EX 


(SP) ,HL 




00360 




EX 


(SP) , HL 




00370 




EX 


(SP) ,HL 




00380 




RET 






00390 


; 




f 




00400 


WAIT 


CALL 


DELAY 


;DELAY 


00410 


WHO 


CALL 


SELECT 


; SELECT DRV 


00420 




IN 


A, (CMD) 


;GET STAT 


00430 




RRCA 




;BUSY? 


00440 




RET 


NC 


;N 


00450 




JR 


WHO 


;LOOP 


00460 


• 








00470 


BUSY 


IN 


A, (CMD) 


; STAT 


00480 




RRCA 


-/ 


;BUSY? 


00490 




JR 


C,BUSY 


;N 


00500 




RET 






00510 


; 








00520 


GETDCT 


LD 


A,C 


;GET DRV 


00530 




RLCA 




;X2 


00540 




RLCA 




;X4 


00550 




LD 


E,A 


;XFR 


00560 




LD 


D,0 




00570 




LD 


HL,DCT 


;DCT 


00580 




ADD 


HL,DE 


;HL=DRV DCT 


00590 




PUSH 


HL 


;SAV TO IX 


00600 




POP 


IX 


■' ■ 


00610 




RET 






00620 


• 




i 




00630 


DCT 


DM 


1+128,(2^,0,3 




00640 




DM 


2+128,0,0,3 




00650 




DM 


4+128,0,0,3 




00660 




DM 


8+128,0,0,3 




00670 


• 








00680 


READ 


CALL 


TASK 


;JP SET-UP 


00690 




DB 


3 


;LOST DATA READ 


00700 




DB 


80 H 


;READ CMD 


00710 




DB 


0A2H 


;INI 


00720 


• 








00730 


WRITE 


CALL 


TASK 


;JP SET-UP 


00740 




DB 


11 


;LOST DATA, WRITE 


00750 




DB 


0A0H 


; WRITE CMD 


00760 




DB 


0A3H 


;OUTI 


00770 


; 








00780 


PROT 


CALL 


TASK 


;JP SET-UP 


00790 




DB 


11 


;LOST DATA WRITE 


00800 




DB 


0A1H 


; WRITE PROT CMD 


00810 




DB 


0A3H 


;OUTI 


00820 


; 








00830 


; 


START 


I/O PROC 




00840 


• 








00850 


TASK 


EQU 


$ 




00860 




LD 


(BUFF) ,HL 


;SAV BUFF ADR 


00870 




LD 


(TAS) ,DE 


;STO TK & SEC 



Listing Continued . 
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. . . Continued Listing 
00880 LD 

00890 LD 

00900 XOR 
00910 OUT 
00920 OUT 

00930 DI 
00940 EX 
00950 

00960 LD 
00970 LD 
00980 INC 
00990 LD 
01000 LD 
01010 INC 

01020 LD 

01030 LD 
01040 LD 

01050 PUSH 

01060 PUSH 

01070 PUSH 

01080 CALL 

01090 TSl CALL 

01100 LD 

01110 OUT 

01120 LD 

01130 OR 

01140 JR 

01150 AND 

01160 JR 

01170 CP 

01180 JR 

01190 LD 

01200 DEC 

01210 JR 

01220 NRT LD 

01230 OR 

01240 POP 

01250 POP 

01260 POP 

01270 POP 

01280 RET 
01290 ; 

01300 TASK2 CALL 

01310 BIT 

01320 JR 

01330 LD 

01340 OUT 

01350 LD 

01360 STP CALL 

01370 IN 

01380 BIT 

01390 JR 

01400 LD 

01410 OR 

01420 OUT 



A, TRIES 


;# I/O TRIES 


(TRIG) ,A 


;STO IN COUNTER 


A 


;CLR 


(NMI) ,A 


;NMI OFF 


(INT) ,A 


;INT OFF 




;INT OFF 


(SP),HL 


;PUSH HL 




;HL->I/0 CODES 


A, (HL) 


;GET FUNC 1ST ERR CODE 


(ERR+1) ,A 


; STO 


HL 


;BMP PTR 


A, (HL) 


;GET I/O CMD 


(lO+l) ,A 


; STO 


HL 


•BMP PT 


A, (HL) 


;GET INI, OUTI CODE 


(OPCODE+D-^A 


;STO OPCODE 


(0PC0D2+1) ,A 


;STO OPCODE 


DE 




BC 




IX 




GETDCT 




TASK2 


;D0 FUNC 


A,0D0H 


; RESET 


(CMD) ,A 


;FDC 


A,E 


;GET ERR 


A 


; ERR? 


Z,NRT 


;N, RET 


7 


; RE- TRY ERR? 


Z,NRT 


;G0 IF ERR 8 


6 


;? 


NC,NRT 


;N 


HL,TRIC 


;TRY COUNTER 


(HL) 


;DEC TRIES 


NZ,TS1 


;TRI AGAIN 


A,E 


;GET ERR COD 


A 


;SET NZ 


IX 


;RES REGS 


BC 




DE 




HL 


. . ■ , 


SELECT 


; SELECT DRIVE 


7,(IX+2) 


;DRV INIT? 


NZ,IP 


;Y 


A,0D0H 


; RESET 


(CMD) ,A 


; FDC 


B,80 


;MAX TRKS 


SELECT 


;SEL DRV 


A, (CMD) 


;GET STAT 


2, A 


;TRK 0? 


NZ,STQ 


;Y 


A,60H 


; STEP CMD 


(IX+3) 


;STEP RATE 


(CMD), A 


; ISSUE STEP 




Listing Continued . . . 



80 Chapter 5 



Model III Disk Driver Routine 



. . . Continued Listing 



01430 




CALL 


WAIT 


fWAIT FOR STEP 


01440 




DJNZ 


STP 


fTEST FOR TRK 


01450 




T.D 


E,8 


?DEV NOT READY 


01460 




RET 






01470 


STQ 


LD 


(IX+1) ,0 


?STO CURR TRK 


01480 




SET 


7,(IX+2) 


', INIT DONE 


01490 


IP 


LD 


A, (IX+1) , 


rGET DRV CUR TRK 


01500 




OUT 


(TRK) ,A 


fSTO IN FDC 


01510 




LD 


HL, (TAS) 


?GET TK & SEC 


01520 




LD 


A,L 


?GET SEC 


01530 




OUT 


(SEC) ,A 


fFDC=SEC 


01540 




T.D 


A,H 


?GET TRK 


01550 




OUT 


(DATA) ,A 


?STO DESIRED TRK 


01560 




LD 


A,10H 


rSEEK CMD 


01570 




OR 


(ix+3) 


?ADD STEP RATE 


01580 




OUT 


(CMD) ,A 


TISSUE SEEK 


01590 




CALL 


WAIT 


fLOOP TILL DONE 


01600 




IN 


A, (TRK) 


?GET CUR TRK 


01610 




LD 


(IX+1) ,A 


?STO 


01620 


; 








01630 




LD 


A,0D0H 


PRESET 


01640 




OUT 


(CMD) ,A 


fFDC 


01650 




LD 


HL,HERE < 


rNMI RTN 


01660 




LD 


(404AH) ,HL , 


rSTO VEC 


01670 




LD 


A,0C3H 


rJP OP 


01680 




LD 


(4049H) ,A i 


rSTO JP 


01690 




LD 


A,0C0H 


fNMI REQ 


01700 




OUT 


(NMI) rA 


;SEL NMI 


01710 




LD 


A, (TRK) ; 


fGET SEL COD 


01720 




CP 


22 ) 


1 WAITS 


01730 




LD 


A, (IX) 1 


rGET TRK 


01740 




SET 


6, A i 


IPRECOMP NEEDED? 


01750 




JR 


C,SAI ; 


!N 


01760 




OR 


32 ; 


rADD PRECOMP 


01770 


SAI 


PUSH 


AF ; 


ISAV 


01780 




LD 


E,2 ) 


•DRQ MASK 


01790 




LD 


B,0 ; 


•BYTE COUNT 


01800 




LD 


CDATA ; 


IDATA REG 


01810 




LD 


HL, (BUFF) 1 


■GET I/O BUFF 


01820 




DI 




IKILL INT 


01830 




XOR 


A ; 


rA=0 


01840 




OUT 


(INT) ,A i 


INO INT 


01850 


10 


LD 


A,80H ; 


IGET CMD 


01860 




OUT 


(CMD) ,A J 


ISSUE CMD 


01870 




CALL 


DELAY j 


•DELAY A SEC 


01880 


LOOP 


IN 


A, (CMD) ) 


•GET STAT 


01890 




AND 


E ; 


•DRQ? 


01900 




JR 


Z,LOOP ; 


•N 


01910 


OPCODE 


INI 




•GET/PUT BYTE 


01920 




POP 


AF ; 


•GET SEL COD 


01930 


A00 


OUT 


(0F4H),A 1 


■SEL, WAIT 


01940 


0PC0D2 


INI 




IMOV DATA 


01950 




JR 


A00 j 


•LOOP 


02000 


; 








02070 


HERE 


EQU 


$ 


Listing Continued 
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. . . Continued Listing 






02080 


POP 


HL 


;KILL LOOP RET 


02090 


IN 


A, (CMD) 


;GET DISK STAT 


02100 


PUSH 


AF 


;SAV STAT 


02110 


IN 


A, (NMI) 


;GET NMI STAT 


02120 


PUSH 


AF 


;SAVE NMI STAT 


02130 


XOR 


A 


;A=0 


02140 


OUT 


(NMI) ,A, 


;NMI OFF 


02150 


POP 


AF 


;GET NMI STAT 


02160 


AND 


64 


? DRIVE TIME OUT? 


02170 


JR 


NZ , HRl 


?N 


02180 


LD 


E,8 


} DEV NOT AVAIL 


02190 


RES 


7,(IX+2) 


rINIT OFF 


02200 


POP 


AF 


rGET DISK STAT 


02210 


RET 






02220 HRl 


POP 


AF 


fGET DISK STAT 


02230 


LD 


E,A 


; E=A 


02240 


OR 


A ' 1 


!N0 ERR? 


02250 


RET 


Z i 


lY 


02260 ERR 


LD 


E,0 J 


•GET ERR START 


02270 


RRCA 




'SHIFT PAST BUSY 


02280 


RRCA 




' DRQ 


02290 


RRCA 




LOST DATA? 


02300 


RET 


C . ; 


Y 


02310 


INC 


E ; 


BMP ERR COD 


02320 


RRCA 




PARITY ERR? 


02330 


RET 


c i 


Y 


02340 


INC 


E ; 


BMP ERR COD 


02350 


RRCA 




SEC NOT FOUND? 


02360 


RET 


C ; 


Y 


02370 


INC 


E ; 


BMP ERR COD 


02380 


RRCA 




PROT SEC/WRITE FAULT? 


02390 


RET 


C ; 


Y 


02400 


INC 


E ; 


BMP ERR COD, MUST BE 


02410 






PROT SEC/WRITE PROT? 


02420 


RET 
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TRSDOS/NEWDOS/VTdS Disk FUes 




Using 

TRSDOS/NEWDOS/VTOS I/O 
Routines 

In this chapter we will be dealing with using the DOS's file I/O routines and 
other DOS trivia. Some programs in the back of the book use DOS file I/O. 



TRSDOS/NEWDOS/VTOS Disk Files 

Why a disk operating system? The DOS performs many useful functions. The 
main function is handUng a certain logical contrivance we commonly call 'files.' 
The DOS handles allocation and de-allocation of disk space for the files. Without 
the DOS, we would have to take care of this big housekeeping chore ourselves. 
Maybe after mastering control of the disk, you might attempt to write your own 
DOS! 

There are two methods of accessing disk files: direct record accessing (also 
referred to as random access) and sequential byte accessing. 

Disk BASIC allows you to access files with random file accessing. Any record in 
the file may be read or written at any time. The DOS will allow logical record 
lengths (LRL) to be different from the actual physical sector length. This may be 
from 1 to 256 bytes per record. 

The DOS will handle 'spanning' sectors if a particular record is spanned over two 
sectors. For example, if your LRL was 200 bytes long, the first record would fit on 
the first sector of the file. The first 55 bytes of the second record would fill up the 
rest of the first sector, and the remaining bytes of the second record would fill up 
the first 145 bytes of the second sector, and so on. 
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Figure 6.1 Record Spanning Two Sectors 

RELATIVE SECTOR RELATIVE SECTOR 1 RELATIVE SECTOR 2 



■^-^ 



LOGICAL RECORD LOGICAL RECORD 1 LOGICAL RECORD 2 



Byte I/O may also be performed, just like reading or writing a byte from a device. 

When speaking in computer terms, do you know what a device is? Your printer, 
video and keyboard are all devices. Mechanical card puncher/readers and paper 
tape punch/readers are devices. A good definition for a computer device is any 
mechanical or logical contrivance capable of supplying and/or 
receiving/processing data. 

When writing to a DOS file in the byte I/O mode, it is appropriate to think of the 
file as a logical device that is storing all those bytes in one giant buffer, to be read 
back in or processed at a later time. 

A legal TRSDOS/NEWDOS/LDOS file specification (filespec) must include 
the primary filename, which may be up to 8 characters long. The first character 
must be a letter from A to Z, although the rest of the characters of the primary 
filename may be alphanumeric (letters or numbers). 

An optional extension may be included to denote the filetype or whatever. This 
may be up to 3 characters in length, but like the primary filename, the first 
character must be a letter from A to Z. 

An optional 8-character password may be included to prevent unauthorized 
persons from accessing the file. The character rule is the same as the primary 
filespec. The first character must be a letter, and the rest of the characters of the 
password may be alphanumeric. 

An optionaf 2-character drive specifier can be included to specify which drive to 
use. The first character must be a colon. This denotes the drivespec. The second 
character is the actual drive number. It must be from to 3. If no drivespec is 
specified, the DOS will scan all drives for the file and open the first file that 
matches the filespec. Depending on the call used, the DOS may create the file on 
the first available drive, or return with a *file not found error.' 

Before calling the open file routine, or before calling any DOS file-handling 
routine. Register 'DE' must point to the first byte of a 32-byte RAM buffer which 
contains the filespec. This is called the FILE CONTROL BLOCK (FCB). It is 
common to hear this referred to as the DEVICE CONTROL BLOCK (DCB). 

The filespec must be positioned in the FCB so that all the unused bytes are on 
the right side of the filespec, or in other words, left set in the buffer. When the file 
is open, DOS keeps all the file's housekeeping information in this FCB buffer. 

Below is a visual description of how the filespec should be set in the FCB prior 
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to calling the DOS open routines. Each dot represents one byte. The dollar sign ($) 
represents the terminator of 03H or ODH that must follow after the last filespec 
bjrte. The 'DE' Register must point to the first byte of the FCB before calling any 
of the file control routines. 



Figure 6.2 Filespec in the FCB 



8 16 24 3 2 
I I... ....I I 

ILENAME/EXT. PASSWORD: 0$ 



Opening a New or Existing File 

In order to open a new or existing disk file, you must point Register *DE' to the 
32-byte RAM buffer that holds the filespec, and is delimited by a bjrte, 03 or OD, 
right after the last filespec character. 

The logical record length, from to 255 (0 being full 256-byte sector record) 
must be put in the *B' Register. If you are just going to access the file in the byte 
I/O mode, this value has no significance whatsoever, 

'HL' must be pointed to the 256-byte I/O buffer, which is used by DOS to 
transfer data to and from the sectors of the file. This value is stored in the FCB 
during 'open' and does not need to be supplied again. 

After setting up the FCB and the registers, execute a call to location 4420. 

ii On return, 'BC\ 'HL' and *DE' are intact. The zero flag will be set if no error 

occurred; otherwise, Register *A' will contain the error code. If a new file was 
created, the c^rry flag will be set. Error processing will be discussed later. 

If a drive was specified, DOS will look for the file on that drive. If the file is not 
there, DOS will create its entry in the disk's directory, and return. 

If a drive was not specified, DOS will scan all the drives starting at drive zero, 
and search for the first occurrence of the filespec. If DOS fin^s the file, it will open 
it and return; otherwise, DOS will create the file on the first drive that contains free 
directory space and return. 

In the FCB, DOS maintains a 3-byte value called the 'EOF' (end of file) byte. 
The first 2 bytes contain the number of the last sector, and the 3rd bjrte contains 
the relative byte position of the last byte in the file. 

Every time a byte or record is written, the EOF byte value is changed to equal 
that record/byte. This is most undesirable when maintaining direct access record 
files. For example, if you had 10 records, and you wrote to record 2, the EOF would 
be set back to record 2, and the last 8 would be de-allocated! This circumstance is 
desirable when writing byte output sequential files because you would want any 
space that wasn't just written to freed. 

The way to prevent the EOF value from being reset when records or bytes are 
written is to turn on bit 6 of byte 2 of the FCB right after you open the file. 

'/ 
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Below is an example of a call to open a new or existing file, setting the 'Don't 
Reset EOF' bit, LRL = 128. 



Figure 6.3 New or Existing File Call Routine Jji/ 1 77^ 



************************************************************ 

** OPEN a New or Existing File. ** 

************************************************************ 



START 



LD 

LD 

LD 

CALL 

JR 

INC 

ID 

SET 

LD 

RET 



DE,FCB 
HL, BUFFER 
B,128 
4420H 
NZ, ERROR 
DE 

A, (DE) 
6, A 
(DE) ,A 



32 BUFF THAT HOLDS FILESPEC 

FILES' I/O BUFFER 

128 BYTE LRL 

OPEN OR CREATE FILE 

GO IF ERROR 

POSITION TO 2ND BYTE OF PCB 

GET BYTE 

SET "DOW RESET BC»"' 

REPLACE 

RET 



BIT 



ERROR (The error processing would be executed here) . 



Opening an Existing File 

T his call enables you to open an existing file, but DOS will not create it if the file 
was not found. This call would be the call to make if, for example, you wanted to 
read in a text file in the byte mode, and you didn't want DOS to create the file if 
it did not find it. You wouldn't want to create an unwanted directory entry just 
because the desired file was not in the system. The register set up is exactly like the 
open/create call. To open an existing file, call 4424. 

Below is an example of a open call, not setting the 'don't reset EOF' bit. LRL = 
full 256-byte record. 



Figure 6.4 File Call Routine 



0?thJ@ 



************************************************************ 

** OPEN an Existing File Only ** 

************************************************************ 



START 



LD 


DE,FCB 


;32 BUFF THAT HOLDS FILESPEC 


LD 


HL,BUFFER 


;FILES' 1/0 BUFFER 


LD 


B,0 


;256 BYTE RBCDRD. 


CALL 


4424H 


;OPM FILE. 


RET 


Z 


;G0 IF NO ERROR 



ERROR (Error processing is done new) . 
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Performing Direct Record I/O 

After you open a file, DOS keeps a value called the Next Record To Access 

(NRA) in the file's 32-byte FCB. When the file is first opened, NRA is set to 0, 

meaning the next record is record 0. Every time a read or write is done, the NRA 

is incremented by one record. 

# 

When accessing a direct record, it is necessary to position the NRA to the record 

you desire to read using the 'Position to Record' call. After this has been done, you 

may call the read or write routines. 

To position to a desired record, the 'DE' Register must point to the FCB of the 
open file that is to be accessed, and 'EC contains the record number to position 
over. Now call 4442. I f an error occurred, its code will be in the 'A' Register. The 
zero flag will be set if no error occurred. 



Figure 6.5 Positioning to a Record 



9oSAJQ 



************************************************************ 

** POSITION to a Logical Record ** 

************************************************************ 



;32 BYTE FILE CXMEROL BLOCK 
; POSITION NRA TO RECORD 10 
;CALL VOSVSKM ROUTINE. 
;RET IF NO ERROR 



LD 


DE,FCB 


LD 


BC,10 


CALL 


4442H 


RET 


Z 



Error processing goes here. 



If you call a read or write routine, and your LRL = 256 (B = at open time), then 
the file's 256-byte I/O buffer is read or written. 'HL' is pointed to the buffer at open 
time, and it is stored in the FCB. 

If you call a read or write routine, and your LRL is not 256, 'HL' must point to 
another buffer called 'Userec' Userec must be the same length as the file's LRL. 
This buffer is different from the 256-byte I/O buffer defined by 'HL' at open time. 
DOS will read and write the logical record to and from the Userec buffer. 

To read a record, call 4436. To write a record, call 4439. 



Figure 6.6 Reading a LRL Record KE,nl/(^ 

** Example of Reading a IiRIi=256 Record ** 

*******************************************j^**************** 



LD 


DE^FCB 


;FILE CONTROL BLOCK 


LD 


BC,20 


;REOORD 20 


CALL 


4442H 


; POSITION TO RECORD 20 



Listing Continued . 
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. . . Continued Listing 

JR NZf ERROR ;G0 IF ERROR 
CALL 4436H ;REfiD SECTOR INTO ]/0 BUFFER 

JR NZr ERROR ;G0 IF ERROR 
REJT ;RET 

ERROR (Error processing goes here.) 



Figure 6.7 Writing a Record Using Userec [)1/KI /c7m^ 

** Example of writing a record whose LRL=130. USEREC must ** 
** contain data to be written. ** 

LD DE,FCB ;FILE CONTROL BLOCK 

LD BC,12 ;RBCORD 12 

CALL 4442H ; POSITION TO RECORD 12 

JR NZ, ERROR ;G0 IF ERROR 

LD HL, USEREC ;DATA BUFFER 

CALL 4436H ;RERD RECORD IN TO USEREC 

JR NZ, ERROR ;G0 IF ERROR 

RET ;RET 
ERROR (Error processing goes here.) 



If you want to write a record and have DOS verify-read it, call 443C. This 
increases the time of the operation by about 100 percent, but it may save important 
data from being lost. Vt^K/^ 

To 'rewind,' or position the current byte/record counters back to the beginning 
of the file, call 443R This does not affect the EOF value unless bit 6 of the 2nd 
byte of the FCB is off. "^E^J^^ 

To 'backspace' one record, cal l 4445. This has no effect on the EOF unless bit 
6 of the 2nd byte of the FCB is off. -g (^^ pp 

To position the current record A>5^e counters to the EOF, call 4448. This is 
useful in adding to the end of a sequential file. T^prsII/Q 

Performing Single-byte I/O 

Remember when we discussed single-b5i;e I/O? DOS gives you the capability of 
reading or writing single b5^es. When files are first opened, the Current Byte 
Position is set to zero. This is not the EOF value. 

Every time a byte is read or written, this value is incremented by one. This is so 
DOS caji keep track of the next byte to read or v/rite. Byte J/0 should be logically 
thought of as reading or writing a byte to a logical device, such as the keyboard or 
the printer. Files accessed by bjrte I/O are referred to as sequential files, because 
the file is logically thought of as one long sequence of bytes. 
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Byte I/O is very useful. For example, that's how Disk BASIC saves and loads its 
programs, and how the machine-language loader in DOS accesses the bji^es of the 
file. Using byte I/O, one could easily write a driver that would route the bytes going 
to the printer to a disk file! Or, you could write a keyboard driver that would get all 
of the bytes from a file instead of the keyboard. 

When calling the byte read/write routines, *DE' must point to a FCB of an open 
file, and if a write is done, Register 'A' must contain the byte to write. On return, 
'A' = byte written or read. ^ F^T%) n^C/T^ 

The call to read a file byte is 13, and the call to write a file byte is IB,, Yeah. I 
know these are ROM addresses, but they jump to a DOS vector. Below is an 
example of a routine that would dump the contents of all memory from 5300 to 
6300 to a currenly open disk file. 



Figure 6.8 Dumping Memory to an Open File 

** Dunp Memory Using Byte Output ** 

START LD HL,5300H ;STi«TING ADDRESS 

;QPEN FILES' PCB 

U. ID A, (HL) ;GET BYTE TO WRITE 

;WRITE TO FILE, 
;G0 IF ERROR 
;BUMP MEMORY POINTER 
;SAVE MEM POINTER 
;SAVE FCB POINTER 
;GESr LIMITfl 
;CLEAR CARRY FLflG 
;O0MPARE 
;RESTORE FCD 
;RESTORE MEM PER 
;RET IF DONE 
;LOQP BA£K 

ERROR (Error processing goes here) . 



Closing Files CcoStS^ 

If record-writes past the file's current EOF are performed, or the EOF is 
different from when you opened the file, it must be closed to store the necessary 
data used by DOS in the directory. It is good practice to close a file if any writes 
have been done, just in case. Closing is never needed if the file was only read from. 

To close the file, load *DE' with the open file's DCB and call 4428. After the 
close, DOS puts the filename and extension (if any) back in the FCB buffer. DOS 
does not put the password back in. *A' contains any error. The zero flag is set if 
there was no error. The close routine will de-allocate any grans past the gran that 
contains the EOF sector. 
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LD 


HL,5300H 


LD 


DE,PCB 


ID 


A,(HL) 


CALL 


IBH 


JR 


NZ, ERROR 


INC 


HL 


PUSH 


HL 


PUSH 


DE 


LD 


DE,6301H 


OR 


A 


SBC 


HL,DE 


K3P 


DE 


POP 


HL 


BET 


Z 


JR 


U 



File Handling - Error Processing 

. . . Continued Listing 

16/10 ILLEGAL LOGICAL FILE ITOBER 

The FCB contains bad data. «DE' probably wasn't pointed 
to the correct FCB, 

17/11 DIRBCIQRY READ ERROR 

An error occurred w^ien a directory sector was read. 

18/12 DIRECTORS WRITE ERROR 

An error occurred when DOS tried to write a dir sector. 

19/13 ILLEGAL FILESPEC 

The filespec contained illegal characters, was too 
long, etc. 

20/14 GAT READ ERROR 

An error occurred when DOS read the granule 
allocation table, 

21/15 GAT WRITE ERROR 

An error occurred when DOS tried to write to the 
granule allocation table. 

22/16 HIT READ ERROR 

An error occurred when DOS read the hash index table. 

23/17 HIT WRITE ERROR 

An error occurred when DOS wrote to the hash index 
table. 

24/18 FILE NOT IN DIRECTORY 

The file that yai tried to open without creating was 
not found. 

25/19 FILE ACESSS DENIED 

You tried to access a file beyond the access code 
assign to the access password. 

26/lA DIRECTORY SPACE FULL 

NO more room is left in the directory to create 
another file 

27/lB DISK SPACE FULL 

There is no available disk space on the disk. 

28/lC EOF ENCOUNTERED. /m^^ 

The byte/ ^gcord just accessed was' the end of file 
byte/record. 

29/lD PAST END OF FILE 

An attaonpt to access past the EOF byte/record. 

30/lE FULL DIRECTORY 

This error would occur if a record write was done, 

and the file entry in the directory needed to be 

extended, but no directory space was left. Listing Continued . 
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Continued Listing 

3V1F EROGKVM NOT FOUM) 



The desired CMD program was not found, 

3^20 ILLEGAL DRIVE NUMBQl 

The drive number in the f ilespec was bad, 

33/21 DEVICE SPACE FOLL - (used in VTOS only) 
NO more roan in the device area left, 

34/22 LOAD FILE FORMAT ERROR 

An att€n^ was made to execute a non-object file, 

35/23 BAD RAM MEMORST 

DOS detected a bad ram location, 

36/24 TSim TO LOAD R£M 

An attej^Jt was made to load RDM with object code, I 
don't know WHY this error exists because you cant hurt 
ROM by trying to load over it anyhow. 

37/25 ACCESS TO FROTBCTHD FILE DENIED 

Olie update password was not supplied, and the access 
password's access level = no access. 

38/26 FILE NOT OPEN 

The FCB was not an open PCB. 



Past EOF Error Messages BR^OR^^ 

When an error occurs while writing a record past EOF/or if EOF is greater than 
It was before the file was opened, it is a good idea to iiXediately close the file 
^^ If you've been using one of the DOSes, I'm sure you'^ seen the error messages, 
xi you want ro aispiay a UUS error message, then call 4409. This is the vectoi^for 

rI'^2 ' a"^^"'^''^1'**'P*^^ '°"*^''^- ™^ °^^^*^y ^1 display the error code in 
K ^T^ t ' ^^y°"7^* * ^^^"^ from the error displayer, bit 7 of Register 'A' must 
be set II It s not, the routine will exit by a jump to 402D, which is the DOS READY 
vector. If you wmit the short error messages, bi*8fthe 'A' Register must be 1- 
othermse, extra diagnostics wiU be displayed ag^hown. Page 6-12 of the TRSDOS 

"^^^f. ^".f,'y«\Y»^!° instates that by j^'ing the error code with 80. the 
uiogiiusucs will De aispiayed. / 

eyjT^ 



Figure 6. 12 Error Display Bits 



76543210 

: 0-5 contain error code, 
?***! if no diagnostics. 
1 if return desired. 
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Here is an example of a short error message: 

LOST DATA DURING READ 
Here is an example of an erroi; message with diagnostics: 



Figure 6.13 ■ Error Message 



** ERROOD=03, LOST DAIA DURING RERD ** 
<FILE>=SIXXVl»T> 
REFERENCED AT X"8233' 



IKSDOS, NEWDOS 2.1 and VTOS all have this diagnostic display format. 
NEWDOS/80 does not have diagnostics. The diagnostics are not very useful^ and 
my guess is that Randy Cook (original author of TRSDOS) probably used them for 
debugging TRSDOS and its utilities. Below is an example of a routine that calls the 
error routine, but does not use the diagnostics, and expects the error routine to 
return control when done. 



Figure 6.14 Error Call Routine 



** Routine Using the DOS Error Displayer ** 

START CALL 4436H ;READ A RECORD 

RET Z ;RET IF OK 

OR C0H ;SEr REIT BIT, AND NO DIAGNOS 

CALL 4409H ;DISPLA^ ERROR 

RET ;REr 



Other DOS Functions 

Since most of these are not listed in your TRSDOS manual, I have included a list 
of other useful DOS calls and jumps. These are all applicable to VTOS and 
NEWDOS/80; however, NEWDOS/80 and VTOS systems have other calls that 
are not listed here because they are not compatible with TRSDOS. 

&^im Chv§ 

4Q2D or 440Q are the normal program exits to the DOS READY 

mode. 
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other DOS Trivia 



4030 is the abnormal program exit to DOS READY. If DEBUG is active, it 
will be invoked. 

44i2S.will cause the DOS command interpreter to execute the command, 
delimited with a byte of OD, pointed to by^the *HL' Register pair. After the 
command or program is executed, DOS READY will be invoked via 402D. 
One way to make this return to your program would be to load402E with the 
address to which you wanted DOS to jump after executing the command, but 
you must fix this after it has returned 

4409 is the vector of the previously discussed DOS error display routine. 

440D w ill jump to the DEBUG monitor. This may also be done by executing 
an RST 28 call. The BREAK invocation will not be enabled. A return to the 
program is done by executing a G 'ENTER* in DEBUG. 

44 IC will extract a filespec from a string of text pointed to by the 'HL' 
Registers, put them in the buffer pointed to by the 'DE' Registers and put a 
03 as a terminator after the last byte transferred. Z will be set if 'HL' is left 
pointing to the terminator (if the terminator was 03 or OD). Otherwise, 'HL' 
will be left pointing to the byte after the terminator. (cJhi^A^te..) 

4467 will output a line of text pointed to by 'HL' to the video and return. The 
text is terminated with either a OD (which is displayed) or 03 (which is not 
displayed). 

446A w ill output a line of text pointed to by 'HL' to the printer and return. 
The text is terminated with either a OD (which is printed) or 03 (which is not 
printed). 

44gllwill put in the 8-byte buffer (pointed to by 'HL') the time in the ASGII 
displayable format of 00:00:00. No terminator is written. 

4470 will put in the 8-byte buffer (pointed to by 'HV) the date in the ASCE 
displayable format of 00/00/00. No terminator is v^itten. 

4473 will insert in the filespec (pointed to by 'DE') the 3-byte file extension 
pointed to by 'HL' (if the filespec does not ahready contain an extension). 
The extension pointed to by *HL' must be 3 characters long. 

Other DOS Trivia 

Have you ever mucked around on a VTOS or TRSDOS system disk with superzap, 
and you couldn't find the boot messages? The boot messages are in System 0, and 
are in negated form. This means all the characters were negated using the Z-80 NE G 
operation. The ASCIIZ AP program in the back of this book will let you display and 
modify these. "What's this," you say? "Who says You can't open system files?" Read 
on. 
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Tired of those annoying passwords? Here are passwords (I call them override 
passwords) for the DOSes. These will let you access, kill, modify or whatever to any 
file, even system files, at any time. An override password that will work on VTOS 
4.0 is BSD. An override password that will work with LDOS (which is VTOS with 
modifications) is KHE3. An override password that will work with TRSDOS or 
NEWDOS 2.1 is NV36. NEWD^OS/SO does not have an override password, but who 
cares? It has a system command that lets you disable password checking. 

How would you like to disable password checking in VTOS, LDOS or TRSDOS 
altogether? Well, first VTOS. Write a patch file that's worded as follows, and 
execute: 

PATCH SYS2/SYS.B8D 

The zaps here will not disable MASTER password checking when full disk 
backups are performed. This patch is for VTOS 4.0 only. 



Figure 6.15 VTOS Password Disable Routine 

.PATCH TO DISABLE VTOS PASSWORD CHECKING 
.16 IS THE HEX NUMBER FOR Z-80 CODE *JR. ' 
.THIS REPLACES *JR Z' 

X/4F1C'=18 

.END OF PATCH 



To disable LDOS password checking, write this PATCH file, and execute: 

PATCH SYS2/SYS.KHE3. 



Figure 6.16 LDOS Password Disable Routine 

.PATCH TO DISABLE LDOS PW CHECKING, 
X'4F12'=18 



To disable TRSDOS password checking, run this Disk BASIC program. This 
patch will only work with TRSDOS versions 2.2 and 2.3. 
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Figure 6.17 TRSDOS Password Disable Routine 

10 OPEN"RM,"SYS2/SYS.NV36"; FIELD1,255ASA$ 

20 GET1,2: B$=A$ 

30 NID$(B$,100,1)»CHR$(24) 

40 LSETA$»B$:PUT1,2 

50 END 



Now you'll never have to mess with those nasty passwords again. I bet it feels 
better already. 
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Model III Supplement to Chapter 6 

Single-Density Disk Format 

This format must be carefully followed in order for a correct format to be 
accomplished. Any deviation may lead to the last sector getting chopped off or 
unaccessible sectors, so follow it carefully. Before issuing a format command, you 
must set up the buffer exactly as the track is to be written. 



Figure 6,18 Buffer Format 



Number of bytes 
36 



Hex value 
00 



Purpose 

Pre track filler 



This block is written once per sector. Since we are going to use the 10-sector 
TRSDOS scheme, this block will be written 10 times. The blocks are written one 
right after the other. 



Figure 6.19 Sector Blocks 



1 


FE 


1 


XX 


1 


00 


1 


XX 


1 


01 


1 


F7 


17 


00 


1 


FB 


256 


E5 


1 


F7 


6 


00 



Sector ID address mark. 

Track nurnber, Tlus MUST be cor recti 

Side number. Use 00. 

Sector number. This value will be the 

sector name - i,e., 05 = SEICTOR 5. 

Sector length computation value. See 

text. 

Generate CRC parity bytes. 

Pre sector data filler. 

Sector data mark. See text. 

Initial sector data. 

Generate sector data CRC. 

Post sector filler. 



After all 10 sectors are written, approximately 200 bytes of FF will have to be 
written, so format your buffer with about 300 bytes of FF, just to be safe. 

The sector-name byte is the byte actually used in naming that sector. TRSDOS 
uses sector names from to 9. You could name the sectors in sequential order 0, 1, 
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2, 3, 4, 5, 6, 7, 8, 9, but to speed-up sector accessing when doing sequential sector 
reads, the sector names are interlaced. TRSDOS uses 0, 5, 1, 6, 2, 7, 3, 8, 4, 9. This 
interlace technique allov/s more time for the DOS and/or programs to perform 
calculations before the next sector is accessed. In most cases all 10 sectors can be 
accessed within 2 revolutions of the disk (where it might otherwise take 3 or 4) 
because the programs weren't quick enough to 'catch' the next sector as it was 
coming around. 

The 'sector length computation' byte is used by the controller to determine how 
many bytes the sector data is. Using the IBM (normal TRSDOS) format, sector 
lengths of 128, 256, 512 and 1024 byte sectors can be achieved by using 0, 1, 2 and 
3 respectively for the sector length computation values. There is no way to squeeze 
ten, 512-byte sectors on a single-density track, so get that out of your mind. Also, 
if you decide that you may want to. use a different s >ctor length, you must adjust 
the quantity of initial sector data bytes to the length of the sector. You will also 
have to do some experimenting to see how many sectors of such-and-such length 
you can fit on a track. 
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TES-80 Model I Interrupts 

What is an interrupt? When you're comfortably sitting in the den, smoking your 
pipe and watching TV, suddenly there's a knock at the front door, or the phone 
rings. That's an interrupt. Or your wife hollers. Thats a real interrupt! (From this 
point on, wives will be referred to as non-maskable interrupts). But Seriously, the 
Model I uses a Z-80 as its processor, right? If you're a machine-language 
programmer, I'm sure you know that by now. The Z-80 has a facility that allows 
program operation to be interrupted. Pushing the current contents of the Program 
Counter (PC Reg), the interrupt causes the Z-80 to start executing at a different 
address until the interrupt is done, or in other words, when a return is executed. It 
is more or less a Torced Call' to an address which we will discuss later. 

What could you use an interrupt for? Well, you could have a routine that 
updates a time clock, provided the interrupts were generated at a constant rate 
(like the one in the expansion interface). You could also have an interrupt routine 
that checks for a group of keys to be pushed (Uke JKL) to perform some fuction, 
like a print-the-screen routine. 

The Z-80 has 2 types of program interruption. One type has three modes. The 
first kind of interrupts is called the maskable interrupts. Maskable means the 
interrupts may be enabled and disabled at will by the software by executing DI and 
EI (disable interrupt and enable interrupt mnemonics, respectivly). 

Only one mode of the maskable interrupts may be active at any one time. I'm 
going to explain how interrupt modes 0, 1 and 2 work. I am assuming that 
interrupts are enabled, and an interrupt is being generated by an external device. 

Mode interrupts allow an external device to place a bjrte on the Z-80 data bus. 
This byte is usually a RST to one of the restart locations. 

Mode 1 interrupts cause the Z-80 to perform a RST to location 38. This is the 
mode used by the Model I. This will be explained in detail a little further on. 
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Mode 2 interrupts cause the Z-80 to call a location derived by the lower 8 bits 
supplied by the device and the upper 8 bits currently in the I Register. 

The second type of interrupt is of the non-maskable type. This means that if the 
NMI pin on the Z-80 ever goes to a low voltage level, the Z-80 will force a call to 66. 
On the TRS-80 Model I, this is cdnnected to the reset button in the back. 

The Z-80 has an input called the Interrupt Request (IR). Every time the Z-80 
finishes its current machine cycle (same as one heartbeat to us humans), it 
logically ANDs the input of the IR with the interrupt enable flip-flop to determine 
if an interrupt should be serviced. You don't worry about this IR input. This is 
taken care of by the IR clock inside the expansion interface. This clock generates 
an IR request once eve^ 25 ms, or 40 times a second. 

If the IR is active and the interrupt enable flip-flop is on, the Z-80 executes a 
RST 38, which is the one-byte equivalent of a CALL 38. In this system, this 
address is a ROM address, so in order to control where the interrupt routine is, 38 
contains a JP 4012, which is a RAM address. This address is the 3-byte vector in 
which you would place your interrupt routine directive, hke JP 5200 if that's 
where your routine is. 

The interrupt enable flip-flop may be switched on or off at any time by executing 
the Z-80 opcodes EI and DI; these enable and disable the interrupts, respectively. 
When this flip-flop is off, the Z-80 will ignore the IR input. 



Figure 7. 1 Interrupt Redirection Routine 



********************************** *********#*ilt4hfr^ 

** Example of Redirecting the RST 38 Interrupt Vector ** 

******************** **********4r*************ifr**** 

LD A,0C3H ;The JP Instruction 

LD (4012H) rA ; Store JP Opcode 

LD HL,5022H ; Interrupt Routine Address 

LD (4013H),HL ;Store Jump Address 



r ' i ■■■ 






There are two memory-mapped addresses associated with reading the interrupt 
status. This must be done in the interrupt service routine to reset the clock in the 
expansion interface and reset the FDC interrupt request The addresses are shown 
below. 

By a coincidence, 37E0 is also the disk select latch, but only when writing to 
that location. When reading, it gives the interrupt status. The graph below shows 
what the bits are used for. 
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Figure 7.2 Interrupt Read Addresses 



5 4 3 2 1 

If interrupt was from the FDC, 

If interrupt was generated from the clock, 



Bit 6 means the FDC made the request Usually you ignore the interrapt and 
return. 

Bit 7 means the interrupt was made by the clock. 

You should read the FDC stat/cmd 37EC Register on every interrupt to 
reset it. 

In your interrupt routines, you should preserve all registers you will be using in 
your interrupt routine. Interrupts are automatically disabled after you read 
37E0, and must be re-enabled after the routine, if you want the interrupts 
enabled. Below is a typical interrupt routine. 



Figure 7.3 Interrupt Routine 

** Interrupt Routine ** 

****************************************************** 



PUSH 


AP 


;Save AF. 


LD 


A, (37ECH) 


; Clear FCD 


LD 


A, (37E0H) 


;Get Int Status 


BIT 


6, A 


;FDC Making Int? 


JR 


NZ, RETINT 


;G6 If So 


BIT 


7,A 


;Was It Valid? 


JR 


Z, RETINT 


;Go If Not 


LD 


A,(3840H) 


;Get KB Byte 


BIT 


7,A 


jBreak Hit? 


JR 


Z, RETINT 


;Go If Not 


JP 


440DH 


;JP To DEBUG 


RETINT LD 


A, (37E0H) 


; Reset Latch 


POP 


AF 


; Restore AF 


EI 




; Enable Int 


RET 




; Return 



This is an example of a routine that would jump to debug if the break key were 
hit. 

So, what do you do if you want to link an interrupt routine with the ones already 
running in the DOSes? Below is a routine that would do just that. 
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Figure 7.4 Interrupt Routine 



*************1t1t*1t1t***1C***1t*'k1lit'k1t*1,**1l***********1t***1l*1c***** 

** INTERRUPT ROUTINE ** 

**********'k-k*1t**********if*l(ic1,*1c*1,***lc**1i******1t************* 



DI 
LD 
LD 
LD 
LD 
£1 
RET 
NEWINT PUSH 
LD 
LD 
BIT 
JR 
BIT 
JR 



HL,DOSA 
(DOS+1) ,HL 
HL, NEWINT 
(4013H) ,HL 



AF 

A, (37ECH) 

A, (37E0H) 

6, A 

NZ,RETINT 

7, A 

Z,RETINT 



;KILL INT 

;GET CURRENT INT ADR 

; STORE FOR JP 

;GET NEW ROUTINE 

; STORE NEW ADR 

; ENABLE INT 

;SAVE AF 
; CLEAR FCD 
;QET INT STATUS 
;FDC MAKING INT? 
;G0 IF SO 
;WAS IT VALID? 
;G0 IF NOT 



<YOUR ROUTINE (S) GOES HERE> 



POP 
DOS JP 
RETINT LD 
EI 
RET 



AF 



A, (37E0H) 



/RESTORE 
;G0 TO DOS's 
; RESET INT LATCH 
; ENABLE 



The DOS address must be right after the instructions that test 37E0 in 
the DOS's interrupt service routine. You can find DOS interrupt routine through 
tracking it down by looking at the 4012 vector and seeing where it jumps. 

You must disassemble routines using RSM, or some other disassembler, to 
determine where to jump to. 

But what about those JVOiV-maskable interrupts? The non-maskable interrupts 
are used in the Model I to reset BASIC or DOS, whichever is appropriate. This is 
invoked by pressing the reset button on the back of the TRS-80. The 
non-maskable interrupt cannot be masked out or disabled. This feature is of i^o 
use to the TRS-80 user other than resetting his computer. When the Z-80 gets an 
NMI reset, it does a CALL 66H instruction, which in this system resets BASIC 
(or DOS if the expansion interface is connected). The NMI and normal, maskable 
interrupts have nothing to do with each other. 

In the back of this book are some useful interrupt routines. 



104 Chapter 7 



5F- 



Model III Supplement to Chapter 7 



Model III Supplement To Chapter 7 
The Model III Interrupt System 

t J^if f A?^ ?^lf w'^ expanded ma«^a6/c interrupt handling system than 
the Siu Maskable interrupt^ can be generated by the cassette RS.232, Td 
Modellll ""' '" "'"' ^'^"^ ^' '*^" "^* "^ P°^ assignments fo^ the 



Figure 7.5 Mode/ /// Port Assignments 



******** INTERRUPT PORTS ******** 
E0 - WRITE - ENABLES VARIOUS DEVICE INTERRUPTS. 

7 UNUSED 

6 

5 



i oS^nJ*!? ^S-232 INT ON PARITY/FRAME/OVERRUN ERRORS 

1 ENABLES RS-232 DATA RECIEVED INT 

4 1 ENABLES RS-232 XMIT BUFFER EMPTY 

3 1 ENABLE BUS I/O INT (EXT HARD DISK, ETC.) 

2 1 ENABLES REAL-TIME CLOCK INT 

1 1 ENABLE 1500 BAUD CASSETTE FALLING EDGE INT 

1 ENABLE 1500 BAUD RISING EDGE INT 

E0 - READ - READ INTERRUPT STATUS 

7 UNUSED 

t S " 55"??? PARITY, FRAME, OR OVERRUN ERRORS 

5 - RS-232 DATA RECEIVED 

4 = RS-232 XMIT BUFFER IS EMPTY 

3 = BUS INTERRUPT (EXT HARD DISK. ETC^ 
^ = REAL-TIME CLOCK 

1 = 1500 BAUD CASSETTE FALLING EDGE 
= 1500 BAUD RISING EDGE INT 

EC - READ - RESET REAL-TIME CLOCK 

™'lElEf Tiii f J^ClSS? "'' ™^ I"^^-™^ ROUTINE 
E4 - WRITE - SELECT NON-MASKABLE INTERUPT DEVICES 

7 1 = ENABLE FDC 'INTRQ* TO NMI 

6 1 = ENABLE DRIVE 'TIME-OUT' TO NMI 
5-0 UNUSED 

E4 - READ - READ NON MASKABLE INTERRUPT STATUS 

7 = FDC 'INTRQ' OCCURED. 

6 = DISK 'TIME OUT' OCCURED. 
5 = RESET BUTTON PRESSED 

Listing Continued . . . 
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******** DISK CONTROLLER PORTS ********* 

F0 - READ - FDC STATUS REGISTER 
F0 - WRIT - FDC COMMAND REGISTER 
Fl - READ/WRIT - FDC TRACK REGISTER 
F2 - READ/WRIT - FDC SECTOR REGISTER 
F3 - READ/WRIT - FDC DA^A REGISTER 

F4 - writ - DISK DRIVE SELECT PORT 

7 1 = DOUBLE-DENSiTY, 0=SiNGLE 

6 1 = GENERATE WAITS 

5 1 = WRITE PRECOMP 

4 = SIDE 0, 1 = SIDE 1 (NOT STANDARD) 

3 SELECT DRIVE 3 

2 SELECT DRIVE 2 
1 SELECT DRIVE 1 

SELECT DRIVE 

******** RS-232 PORTS ********* 
E8 - READ - MODEM STATUS REGISTER 

7 CLEAR TO SEND, PIN 5 OF DB-25 

6 DATA SET READY, PIN 6 

5 CARRIER DETECT, PIN 8 

4 RING DETECT, PIN 22 
3-2 UNUSED 

1 UART CONTROL REGISTER LOAD STATUS. 1=0N 

RECEIVER INPUT, PIN 20 

E8 - WRITE - MASTER RESET 

E9 - READ - BAUD RATE SENSE SWITCHES 

E9 - WRITE - SELECT BAUD RATE 

EA - READ - UART STATUS 

7 1 = DATA RECEIVED 

6 XMIT HOLDING EMPTY 

5 OVERRUN ERROR 
4 FRAMING ERROR 

3 PARITY ERROR 
2-0 UNUSED 

EA - WRITE - UART COMMAND REGISTER 

7-6 UNUSED 
5-3 UNUSED 

2 = DISABLE XMIT DATA 

1 DATA TERMINAL READY 
REQUEST TO SEND 

******* LINE PRINTER PORT ******* 
P8 - READ - PRINTER STATUS 

^ BUSY Listing Continued . 
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6 OUT OF PAPER 

5 ON LINE 

4 FAULT 
3-0 UNUSED 

P8 - WRITE - WRITE BYTE TO BE PRINTED 

******** CASSETTE, AND VIDEO PORTS ******** 

EC - WRITE - CASSETTE AND VIDEO CONTROL 

7-6 UNUSED 

5 1 ENABLES VIDEO WAITS 

4 1 ENABLES EXTERNAL I/O BUS 

3 1 ENABLES ALTERNATE VIDEO CHARACTER SET 

2 1 ENABLES 32 CHAR MODE 

1 1 TURNS CASSETTE MOTOR ON 

UNUSED 

FF - WRITE - CASSETTE DATA PORT 

7-2 UNUSED 

1-0 CONTROL CASSETTE OUTPUT LEVEL 



Handling Model III Interrupts 

The maskable interrupt vector is the same for the Model I and Model III. The 
vector is located at 4012 - 4014. When a maskable interrupt occurs, the Z-80 
forces a CALL to location 38. Since this is a ROM address, the ROM then jumps 
to RAM location 4012. This allows a programmable interrupt handling routine to 
reside anywhere in memory. 

Once your interrupt routine is in control, you can read the INT status from port 
EO, determine the cause of the INT, and branch to the appropriate subroutine. 
Keep in mind that if the interrupt was caused by the REAL-TIME CLOCK, you 
must read port EC to reset it. Otherwise, an immediate interrupt will occur once 
interrupts are enabled again before returning to the interrupted program, thereby 
causing a system *HANG'. 

To select the desired interrupt options, store the proper bits in port EO. 



Figure 7.6 Interrupt Bits in Port EO 



LD A, 4 ; Enable Real-Time Clock 

OUT (0EflH) ,A 

RET 
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RS-232 Interrupts 

If you're famiHar with the RS-232, you might want to use the RS-232 interrupt 
options. There are three different options for the RS-232. These are: 

1. INT when PARITY, FRAMING, or OVERRUN error occurs. 

2. INT when a character has been recieved. 

3. INT when the RS-232 transmitter 'holding tank' is empty. 

Port Mapped External Devices and Interrupts 

The Model HI has hardware installed that permits Z-80 access to external devices 
via ports 00 through 7F. Tandy reserves ports 80 through FF, and they should not 
be used for your devices if you want to maintain Tandy compatibility, since Tandy 
may make available devices that use these addresses. For more information on the 
hardware aspect, order the Radio Shack Model HI service manual, catalog numbers 
26-1061/1062/1063. 

Once the hardware is connected to the applicable ports, the port bus can be 
enabled or disabled by switching bit 4 in port EC. 

There is also an external maskable interrupt tie-in capability, which allows 
external devices to generate a maskable interrupt, if desired, by using this feature. 
The external interrupt line may be enabled or disabled by switching bit 3 in port 
EO. Note that even if external interrupts are disabled, you can still read the 
interrupt status line (bit 4, port EO). 

Real Time Clock Interrupts 

The Model IIPs real-time clock provides a 25 or 30 Hz signal (for 50 and 60 Hertz 
AC current respectively) to the maskable interrupt circuits for time clock 
generation. If interrupts are enabled, and the REAL-TIME CLOCK (RTC) option 
is set in port EO, then a call to 38 is executed. Since this is a ROM address, a jump to 
RAM address 4012 is performed. This should contain a jump instruction to the 
software interrupt handler. The interrupt handler can check whether this was an 
RTC interrupt by testing bit 2 in Port EO. If this was, in fact, an RTC interrupt, you 
would then reset the real-time clock by reading Port EC. If this is not done, the RTC 
line will stay on, and when the routine enables the interrupts again, the routine itself 
will be interrupted. This will either cause a 'hang' in the system or eventual 
clobbering of the RAM stack, probably within miUiseconds. 

The Model III already has interrupt handler and real-time clock update/display 
routines built right in! The interrupt vector routine is located at 3018 (this jumps 
to 35C2, where the actual routine is). It branches to different RAM and ROM 
addresses, depending on what device interrupted it. Below is the table used by 
Model III interrupt handler. 
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Figure 7.7 Model III Interrupt Handler 



Port E0 
Bit 





1 
2 



3 
4 
5 
6 
7 



RISING EDGE 1500 cassette -> 
FALLING EDGE 1500 cassette -> 
REAL-TIME CLOCK -> 

Which usually jumps to 3529H. 
This routine flashes the cursor. 
It displays the clock in 00:00:00 
format if bit at 4210H is set. 
EXTERNAL INTERRUPT -> 

RS-23 2 XMIT BUFFER IS EMPTY -> 
RS-232 DATA RECEIVED -> 

RS-23 2 RECEIVE ERROR -> 

CURRENTLY UNUSED -> 



3365H ROM 
3369H ROM 
4046H RAM 



403DH RAM 
4206H RAM 
4209H RAM 
4040H RAM 
4043H RAM 



The 1500-Baud Cassette Interrupts 

You probably won't find these too useful, unless you're into cassette operations. 
When these options are enabled, an interrupt will be generated when the cassette 
input voltage goes low and/or high (depending on options). You must use your own 
interrupt vector routine if you desire to use these, because the ROM interrupt vector 
routine jumps directly to ROM subroutines tfiat control the cassette. 
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Handy Routines, Drivers and Programs 

Below are some useful routines and programs I have written. Just key them into 
EDTASM or BASIC, whichever applies, and use them. 

TRSDOS Error Displayer 

As previously mentioned in Chapter 6, you may use the TRSDOS error 
displayer. But if, for some unpredictable reason, you do not want to use 
TRSDOS's, perhaps because you're writing a new super-dooper disk-zap or 
something, and you want it to be independent of the DOS, I have included this 
not-too-sophisticated error displayer. It doesn't do those fancy diagnostics that 
TRSDOS has. This routine is made to be inherent in a program, and is not used as 
a DOS overlay. 



Figure 8. 1 TRSDOS Error Displayer 



00100 
00110 
00111 
00120 
00140 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 



TRSDOS COMPATIBLE ERROR MSG DISPLAYER 
LD A With Error Code - CALL "ERRMSG" 
Uses Regs HL, B, DE (in Call to 33H) 



ERRMSG EQU 
CP 
JR 
LD 

WW LD 
INC 
LD 

LI CALL 
DJNZ 
CALL 



§ 

43 

C,WW 

A,43 

B,A 

B 

HL, ERRORS 

BYTE 

LI 

4467H 



ROUTINE START 
OVER MAX ERROR CODE? 
GO IF NOT OVER 
LOAD WITH UNDEFINED MSG 
PUT ERROR IN B 
BUMP SO 0=1 ETC. 
GET ERROR MSG TABLE 
SEARCH FOR NEXT MSG 
DO UNTIL ERROR REACHED 
CALL DOS LINE DISPLAY 
Listing Continued . . . 
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00260 


LD 


Arl3 ; CARRIAGE RETURN BYT] 


00270 


JP 


33H ; PRINT IT, AND RETURl 


00320 


BYTE LD 


A, (HL) ;GET BYTE 


00330 


INC 


HL ;BUMP 


00340 


CP 


3 ;DEL? 


00350 


RET 


Z ;RET IF SO 


00360 


JR 


BYTE , ;TRY AGAIN 


00370 


ERRORS EQU 


$ 


00380 


DEFB 


3 


00390 


DEFM 


•NO ERROR' 


00400 


DEFB 


3 


00410 


DEFM 


•PARITY ERROR DURING ID READ' 


00420 


DEFB 


3 


00430 


DEFM 


•SEEK ERROR <READ> ' 


00440 


DEFB 


3 


00450 


DEFM 


•LOST DATA <READ> ' 


00460 


DEFB 


3 


00470 


DEFM 


'PARITY ERROR <READ> ' 


00480 


DEFB 


3 


00490 


DEFM 


'SECTOR NOT FOUND <READ> ' 


00500 


DEFB 


3 


00510 


DEFM 


'PROTECTED SECTOR' 


00520 


DEFB 


3 


00530 


DEFM 


'PROTECTED SECTOR' 


00540 


DEFB 


3 


00550 


DEFM 


'DEVICE NOT AVAILABLE' 


00560 


DEFB 


3 


00570 


DEFM 


'PARITY ERROR DURING ID WRITE' 


00580 


DEFB 


3 


00590 


DEFM 


•SEEK ERROR <WRITE> • 


00600 


DEFB 


3 


00610 


DEFM 


•LOST DATA <WRITE> • 


00620 


DEFB 


3 


00630 


DEFM 


•PARITY ERROR <WRITE> ' 


00640 


DEFB 


3 


00650 


DEFM 


'SECTOR NOT FOUND <WRITE> ' 


00660 


DEFB 


3 


00670 


DEFM 


'DISK DRIVE FAULT <WRITE> ' 


00680 


DEFB 


3 


00690 


DEFM 


'WRITE PROTECTED DISK' 


00700 


DEFB 


3 


00710 


DEFM 


'BAD FILE NUMBER' 


00720 


DEFB 


3 


00730 


DEFM 


'DIRECTORY ERROR <READ> ' 


00740 


DEFB 


3 


00750 


DEFM 


'DIRECTORY ERROR <WRITE> ' 


00760 


DEFB 


3 


00770 


DEFM 


'ILLEGAL FILESPEC 


007 80 


DEFB 


3 


007 90 


DEFM 


'GAT READ ERROR' 


00800 


DEFB 


3 


00810 


DEFM 


•GET WRITE ERROR' 


00820 


DEFB 


3 


00830 


DEFM 


•HIT READ ERROR' 


00840 


DEFB 


3 


00850 


DEFM 


'HIT WRITE ERROR' Listing Continued . 
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. . , Continued Listing 




00860 


DEFB 


3 


00870 


DEPM 


'FILE NOT FOUND' 


00880 


DEFB 


3 


00890 


DEEM 


'FILE ACCESS DENIED' 


00900 


DEFB 


3 


00910 


DEFM 


'DIR SPACE FULL' 


00920 


DEFB 


3 


00930 


DEFM 


'DISK SPACE FULL' 


00940 


DEFB 


3 


00950 


DEFM 


•END OF FILE' 


00960 


DEFB 


3 


00970 


DEFM 


'PAST END OF FILE' 


00980 


DEFB 


3 


00990 


DEFM 


'CANT EXTENa FILE' 


01000 


DEFB 


3 


01010 


DEFM 


'PROGRAM NOT FOUND' 


01020 


DEFB 


3 


01030 


DEFM 


'ILLEGAL DRIVE NUMBER' 


01040 


DEFB 


3 


01050 


DEFM 


' DEVICE SPACE FULL ' 


01060 


DEFB 


3 


01070 


DEFM 


'NOT AN OBJECT FILE' 


01080 


DEFB 


3 


01090 


DEFM 


'BAD MEMORY' 


01100 


DEFB 


3 


01110 


DEFM 


•TRIED TO LOAD ROM' 


01120 


DEFB 


3 


01130 


DEFM 


'ACCESS TO PROTECTED FILE DENIED' 


01140 


DEFB 


3 


01150 


DEFM 


'FILE NOT OPEN' 


01160 


DEFB 


3 


01170 


DEFM 


'DRIVE NOT READY' 


01180 


DEFB 


3 


01190 


DEFM 


'SYSTEM PROGRAM NOT FOUND' 


01200 


DEFB 


3 


01210 


DEFM 


'PARAMETER ERROR' 


01220 


DEFB 


3 


01230 


DEFM 


'OUT OF MEMORY' 


01240 


DEFB 


3 


01250 


DEFM 


'UNDEFINED ERROR CODE' 


01260 


DEFB 


3 


01270 ; 






01280 ; 


END OF 


ERROR MESSAGE TABLE 



Disk Formatter Program 

Below is a program that will format a disk. Each track contains 10 standard 
256-byte, IBM-compatible sectors named to 9. The sector names are in the 
SECIND table and may be changed to your whims. Remember, the DISKIO driver 
in Chapter 5 will read or write any sector name and any IBM-compatible sector. 
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The number of tracks is defined in the NUMTK DEFB, and this may be 
changed. Why not modify this program to ask the number of tracks and all of the 
parameters? 

The drive is determined by the DRIVE DEFB, and this must be in the SELECT 
format (i.e., 1, 2, 4, or 8 for drives 0, 1, 2, or 3). 

This formatter does not initialize 'a TRSDQS-compatible directory or BOOT. 



Figure 8.2 Disk Format Routine 




00100 


• 


DISK 


FORMATTER 


00120 


• 






00130 




ORG 


5200H 


00135 


NUMTK 


DEFB 


40 


00140 


TRACK 


NOP 


-' 


00150 


DRIVE 


DEFB 


1 


00160 


SECIND 


DEFB 





00170 




DEFB 


5 


00180 




DEFB 


1 


00190 




DEFB 


6 


00200 




DEFB 


2 


00210 




DEFB 


7 


00220 




DEFB 


3 


00230 




DEFB 


8 


00240 




DEFB 


4 


00250 




DEFB 


9 


00260 


MESS 


DEFM 


•HIT ANY KEY 


00270 




DEFB 


13 


00280 


START 


EQU 


$ 


00290 




LD 


HL,MESS 


00300 




CALL 


4467H 


00310 




CALL 


49H 


k)0320 




CALL 


RESTOR 


00330 




LD 


HL,USER 


00340 




LD 


B,0 


00350 


L0 


LD 


(HL),0E5H 


00360 




INC 


HL 


00370 




DJNZ 


L0 


00380 




LD 


HL,SEC1 


00390 




LD 


B,ll 


00400 


L02 


LD 


(HL) ,0FFH 


00410 




INC 


HL 


00420 




DJNZ 


L02 


00430 




LD 


HL,DATA 


00440 




LD 


(HL) ,0FCH 


00450 




INC 


HL 


00460 




LD 


B,10 


00470 


LI 


LD 


(HL) ,0FFH 


00480 




INC 


HL 


00490 




DJNZ 


LI 


00500 




LD 


B,6 
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; Format 40 tracks 
;Current track counter 
; Drive select byte for 
; drive zero 
; Sector names 



TO BEGIN FORMATTING" 



Start of program 

Start of message 

Display line 

Wait for key hit 

Restore drive's head 

Get SECTOR data buffer 

Load counter 256 bytes 

Write sector bytes 

Bump ptr 

Do 256 times. 

Get pre-sector header 

# bytes to FF 
FF bytes 
Bump ptr 

Do 11 times. 

Get start of format 

data 
Write index mark 
Bump ptr 

# of track header bytes 
Init to FF 

Bump ptr 

Do 10 times. 

# of zeroes to init 

Listing Continued . 
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Listing Continued . 


. . 




00510 


Lll 


LD 


(HL},0 


00520 




INC 


HL 


00530 




DJNZ 


Lll 


00540 




LD 


B,4 


00550 


L2 


LD 


(HL) ,0PPH 


00560 




INC 


HL 


00570 




DJNZ 


L2 


00580 




EX 


DE,HL 


00590 


; 






00600 




LD 


A,10 


00610 


L3 


LD 


HL, SECTOR 


00620 




LD 


BC,287 


00630 




LDIR 




00640 




DEC 


A 


00650 




JR 


NZ,L3 


00660 




LD 


B,0 


00670 




EX 


DE,HL 



Zero bytes 

Bump ptr 

Do 6 times 

# of header bytes. 
Init to FF 
Bump ptr 
Do 4 times 
Get data start in DE 

# sectors to set-up 
Get sector ID overhead 

# bytes to transfer 
Move into buffer 
Dec # sectors counter 
Go move another sector 

if counter not 
256 trailing track 

bytes. 
Get end in HL 

These bytes are the trailing bytes after the last sector. They are 
written until the FDC is done. 



00680 


L5 


LD 


(HL) ,0FFH 


00690 




INC 


HL 


00700 




DJNZ 


L5 


00710 




JR 


CTRL 


00720 


; 






00730 


MTK 


LD 


HL,DATA 


00740 




LD 


DE,21 


00750 




ADD 


HL,DE 


00760 




LD 


DE,7 


00770 




ADD 


HL,DE 


00780 




LD 


DE, SECIND 


00790 




LD 


B,10 


00800 


L4 


LD 


A, (TRACK) 


00810 




LD 


(HL) ,A 


00820 




INC 


HL 


00830 




INC 


HL 


00840 




LD 


A, (Dfc) 


00850 




LD 


(HL) ,A 


00860 




INC 


DE 


00870 




PUSH 


DE 


00880 




LD 


DE,285 


00890 




ADD 


HL,DE 


00900 




POP 


DE 


00910 




DJNZ 


L4 


00920 




RET 




00930 


• 






00940 


t 


CONTROLLER 


00950 


; 







Init to PP 
Bump ptr 
Do 256 times 
Go start format 

Get start of data 
buffer 

# of track overhead 
bytes. 

Pass up track header 
Amt to bump to posn 

track 
Positon over track 
Get sector names buff 

# of sectors to name 
Get current track # 
Put track in sector 

ID. 
Position over sector 

Get sector name 
Put in sector ID 
Bump to next sec name 
Save name pointer 
Amt to posn over next 

sector ID 
Position 
Get names again 
Loop 10 sec not done 
Ret to CTRL 
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00960 


CTRL 


EQU 


$ 


00970 


EQQ 


CALL 


MTK 


00980 




CALL 


EXEC 


00990 




LD 


A, (TRACK) 


01000 




INC 


A 


01010 




LD 


(TRACK) /A 


01015 




LD 


C,A 


01017 




LD 


A, (NUMTK) 


01020 




SUB 


C 


01030 




JR 


Z,EXQ 


01040 




CALL 


STEPIN 


01050 




JR 


EQQ 


01060 


EXQ 


CALL 


RESTOR 


01070 




XOR 


A , 


01080 




EI 




01090 




RET 




01100 








01110 


EXEC 


EQU 


$ 


01120 




LD 


DE,DATA 


01130 




LD 


HL,37ECH 


01140 




CALL 


SELECT 


01150 




LD 


A, (DE) 


01160 




INC 


DE 


01170 




DI 




01180 




LD 


(HL),0F4H 


01190 




CALL 


WAIT 


01200 


• 






01210 


LOOP 


EQU 


$ 


01220 




BIT 


1,(HL) 


01230 




JR 


NZ,PUT 


01240 


LOOPl 


BIT 


0,(HL) 


01250 




RET 


Z 


01260 




JR 


LOOP 


01270 


PUT 


LD 


(37EFH) ,A 


01280 




INC 


DE 


01290 




LD 


A, (DE) 


01300 




JR 


LOOPl 



Start of sector data set-up 
01320 SECTOR NOP 



01330 


NOP 




01340 


NOP 




01350 


NOP 




01360 


NOP 




01370 


NOP 




01380 


DEFB 


0FEH 


01390 


NOP 




01400 


DEFB 


1 


01410 


NOP 




01420 


DEFB 


1 
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Init sector names and 
track in sectors id's 

Go format current trk. 

Get current track. 

Add 1 

Store in counter 

Put in C 

Get max number of TKS 

Max yet? 

Go if max reached 

Step head in once. 

Start prbcess for next 
track 

Restore head 

Clear for no error ret 
to DOS 

Enable interrupts 

Ret to DOS 



;Get track set-up 
;FDC cmd/stat address 
; Select drive 
;Get first data byte 
;Bump data ptr 
;Disable interrupts 
;Issue write track cmd 
;Wait for FDC to act 



Does FDC request a 

byte? 
Go if so 
Format done? 
Ret if so 
Loop if not 
Transfer byte to FDC 
Bump data ptr 
Get next data byte 
Continue 



;ID address mark 
/•Spot for track 
;Side number 
;Spot for sector 
; IBM sector compute byte 
Listing Continued . . . 
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. . . Continued Listing 




01430 


DEFB 


0F7H 


01440 SECl 


DEFS 


11 


01450 


NOP 




01460 


NOP 




01470 


NOP 




01480 


NOP 




01490 


NOP 




01500 


NOP 




01510 


DEFB 


0FBH 


01520 USER 


DBFS 


256 


01530 


DEFB 


0F7H 


01540 RESTOR 


CALL 


SELECT 


01550 


LD 


A,0D0H 


01560 


LD 


(37ECH) ,A 


01570 


CALL 


WAIT ' 


01580 


LD 


A,3 


01590 


LD 


(37ECH) ,A 


01600 


CALL 


WAIT 


01610 RESl 


LD 


A, (37ECH) 


01620 


RRCA 




01630 


RET 


NC 


01640 


CALL 


SELECT 


01650 


JR 


RESl 


01660 SELECT 


LD 


A, (37ECH) 


01670 


PUSH 


AF 


01680 


LD 


A, (DRIVE) 


01690 


LD 


(37E0H) ,A 


01700 


POP 


AF 


01710 


RLCA 




01720 


RET 


NC 


01730 


PUSH 


BC 


01740 


LP 


BC,0A000H 


01750 


CALL 


60H 


01760 


POP 


BC 


01770 


RET 




01780 ; 






01790 STEPIN 


CALL 


SELECT 


01800 


LD 


A,0D0H 


01810 


LD 


(37ECH) ,A 


01830 


LD 


A,43H 


01840 






01850 


LD 


(37ECH) ,A 


01860 


CALL 


WAIT 


01870 BUSY 


LD 


A, (37ECH) 


01880 


RRCA 




01890 


RET 


NC 


01900 


JR 


BUSY 


01910 WAIT 


PUSH 


HL 


01920 


POP 


HL 



; for 256 byte sector 
;Gen CRC for address 
; byte 
;For filler 



Data address mark 

For E5 user data 

Gen CRC for data 

Select drive 

Reset FDC cmd 

Reset FDC 

Give FDC a chance 

Res tor cmd, 40 ms. 

Issue restore cmd 

Let FDC respond 

Get status 

Shift busy into C 

Ret if restor done 

Select drive 

Loop 

Get status 

Save 

Get select code 

Select drive 

Get old status 

Shift not ready bit 

into C flag 
Ret if drives were 

already rotating 
Save reg 
Delay for 1 sec to let 

drive motors come up 

to speed. 
Call ROM BC delay 

routine 
Restore BC 
Return 

Select drive 
Reset FDC cmd 
Reset FDC 
Step-in cmd, no upd 

no verf , 40 ms rate. 
Issue step-in cmd 
Get FDC act 
Get status 

Shift busy into carry 
Ret if not busy 
Loop until not busy 
Waste a few microsecs 

to let FDC react to 



Listing Continued . 
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. . Continued Listing 


r 




01930 
01940 
01950 
01970 DATA 


PUSH 
POP 
RET 
EQU 


HL 
HL 

§ 


01980 


END 


'START 



; cmd 



;End o£ program 

; track data assembled 

; here 



PASSFIND, Password Finder 

Below is a small program that will take a password encode and dislay passwords 
that will work for that encode. Encodes must be entered in MSB, LSB order. For 
example, if the encode looks like 9642 in the file's directory spot, that is really the 
LSB, MSB form of 4296, and it must be entered 4296 in this program: 

The routine tests about 1300 passwords per second and usually takes about 1 
minute before a match will be foimd. After the match is printed, the routine will 
continue printing out all possible matches until you hit the reset button. This is the 
program I used to decode the VTOS and TRSDOS override passwords. 



Figure 8.3 Password Display Routine 



00100 
00120 
00130 
00140 
00150 
00160 
00170 
00180 
00190 

00200 
00210 
00220 
00230 
00240 
00260 
00270 
00280 
00290 
00300 
00310 
00320 
00330 
00340 

00360 
00370 



PASSFIND - CALCULATES THE PASSWORD OF A FILE. 



ENCODE 
INITM 



INBUF 
PBUFF 



XFER 
MAIN 



ORG 

DEFW 

DEFM 

DEFB 

DEFB 

DEFS 

DEFS 

DEFB 

LD 

CALL 

LD 

CALL 

LD 

LD 

CALL 

JP 

LD 

OR 

JR 

CALL 

JR 

LD 
LD 



5200H 



' PASSWORD 

10 

13 

5 

8 



; Encode storage 
FINDER PROGRAM' 



HL, INITM 

4467H 

A,'*' 

33H 

HL, INBUF 

B,4 

40H 

C,402DH 

A,B 

A 

Z,MAIN 

HEXIN 

C,MAIN 

(ENCODE), 
HL, PBUFF 



Line input buffer 
Password assembly 

Print buffer 
Print terminator 
Get program announce 
Display 

Get prompt char 
Display 

Get input buffer 
Max # of chars to input 
Go line input 
Go if break hit 
Get # chars input 
Set flags 

Go back if enter only hit 
Convert input to hex 
Go if any chars were 
not hex digits 
DE ; Store encode 

Get PW assembly buffer 

Listing Continued . . ■ 
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PASSFIND, Password Finder 



. . Continued Listing 



00380 
00390 

mAm 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 

00490 

00500 

00510 

00520 

00530 

00540 

00550 

00580 

00590 

00600 

00610 

00620 

00630 

00640 

00650 

00660 

00670 

00680 

00690 

00700 

00710 

00720 

00730 

00740 

00750 

00760 

00770 

007 80 

00790 

00800 

00810 

00820 

00830 

00840 

00850 

00860 

00870 

00880 

00890 

00900 
00910 
00920 



II 



CONV 



CI 
C2 



C3 



HEXIN 



EXEC 



LD 

LD 

INC 

LD 

INC 

DJNZ 

JP 

EQU 

CP 

JR 

CP 

JR 

CP 

JR 

CP 

JR 

SCP 

RET 

SUB 

OR 

RET 

SUB 

OR 

RET 

EQU 

LO 

INC 

CP 

RET 

CALL 

RET 

PUSH 

EX 

ADD 

ADD 

ADD 

ADD 

LD 

LD 

ADD 

EX 

POP 

JR 



(HL) , 'A' 

B,7 

HL 

(HL),')z^' 

HL 

II 

EXEC 

$ 
• 01 

C,C1 

•G' 

NC,C1 
I . I 

« 

C,C2 
•A" 

NC,C3 . 



30H 
A 

37H 
A 

$ 

A, (HL) 

HL 

13 

Z 

CONV 

C 

HL 

DE,HL 

HL,HL 

HL,HL 

HL,HL 

HL,HL 

D,0 

E,A 

HL,DE 

DE,HL 

HL 

HEXIN 



EXECUTES PW CALC 

EQU $ 

CALL HASH 

LD DE, (ENCODE) 

RST 18H 

CALL Z, MATCH 

CALL UPDATE 

JP C,GOGO 



;Init with first PW 

;# of chars left 

;Bump assembly ptr 

;Put in spaces 

;Bump ptr 

;Do 7 times 

;Go start compares 

Is it num? 

Go if under '0' 

Over hex? 

Go If over 

0-9? 

Go if so 

A-F? 

Go if so 

Set error flag 

Ret 

Adjust 'dec' to real 

Kill C flag 

Ret 

Adjust hex digit 

Kill C flag 

Ret 

Put hex input in DE 

Get next byte 

Bump input ptr 

Terminate? 

Ret if end of input 

Convert byte to real 

Ret if invalid chars 

Save input ptr 

Get current accum in HL 

Mult accum by 16 

Shift HL left 4 times 



;Zero 

;Get last digit 

;Add to accum 

;Put in DE 

;Get input ptr 

; Process next byte 



Compute encode from 

current PW in buffer 
€©t encode to compare 

against 
Compare using ROM 

compare DE to HL sub. 
Go display if match 
Go bump current PW 
Go if end of test 

Listing Continued . 
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HCl 



00930 

00935 

00940 

00970 

00980 

00990 

01000 

01010 

01020 

01030 

01040 

01050 

01060 

01070 

01080 

01090 

01100 

01110 

01120 

01130 

01140 

01150 

01160 

01170 

01180 

01190 

01200 
01210 

01220 

01230 

01240 

01250 

01260 

01270 

01280 

01290 

01300 

01310 

01320 

01330 

01340 

01350 

01360 

01370 



01380 U0 

01390 

01400 

01410 
01420 
01430 



JR EXEC 
CREATES A TWO BYTE HASH CODE IN HL 



;It is impossible to 

; run the program this 
; long - see text 
;Try next PW 



ON ENTRY : DE -> TEXT , B = # OF BYTES 



HASH 



LD 

LD 

LD 

LD 

PUSH 

LD 

LD 

LD 

AND 

RRCA 

RRCA 

RRCA 

XOR 

LD 

LD 

ADD 

ADD 

ADD 

ADD 

XOR 
XOR 
LD 

ITd 

ADD 
XOR 
XOR 
LD 
EX 
POP 
DEC 
DJNZ 
RET 
UPDATE EQU 



LD 
LD 
XOR 
LD 



LD 

CALL 

RET 

INC 

DJNZ 

SCF 



B,8 

DE,PBUFF+7 

HL,0FFFFH 

A, (DE) 

DE 

D,A 

E,H 

A,L 

7 



L 

L,A 

H,0 

HL,HL 

HL^HL 

HL,HL 

HL,HL 

H 

D 

D,A 

A,L 

HL,HL 

H 

E 

E,A 

DE,HL 

DE 

DE 

HCl 

? 

B,8 

HL,PBUFF 

A 

(FLAG) ,A 



A, (HL) 

BUMP 

NC 

HL 
U0 



;8 CHARS 

; Point to end of PW buff 

;Init HL 

;Get byte 

;Save PW ptr 

;Get char in D 

;Get cur H in E 

;Put L in A 

;Keep low 3 bits 

;Put in hi 3 bits 



;XOR with L 

;Put in L 

;Zero H 

; Shift HL left 4 times 



Xor A with H 

Xor A with D c<^^ "^ 

Put in D y^-c^' lufilft 

Put L in A 

Shift HL left once 

Xor A with H 

Xor with E 

Put in E Y-*M^ Uc-Cyt: 

Put encode in HL 

Get ptr 

Dec ptr 

Do 8 times 

Ret with encode in HL 



; Number of char in PW 

/•Get PW buff 

;Clear 

;Flag=0 on first char 

;Because char must be 

;A-Z as defined by DOS 

;Get next char 

; Advance one 

;Ret if done - else must 

;bump next byte also 

;Bump ptr 

;Do max of 8 times 

;Test done 

Listing Continued . . . 
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Continued Listing 

01440 RET 

01450 BUMP CP 

01460 JR 

01470 CP 

01480 JR 

01490 CP 

01500 JR 

01510 INC 

01520 LD 

01530 RET 

01540 Ul LD 

01550 LD 

01570 RET 

01580 U2 LD 

01590 OR 

01600 JR 

01610 INC 

01620 LD 

01630 LD 

01640 JR 

01650 U8 LD 

01660 U80 LD 

01670 SCF 

01680 RET 

01690 U3 LD 

01700 LD 

01710 OR 

01720 RET 

01730 FLAG NOP 

01740 GOGO JP 

Prints Out Match 

01750 MATCH LD 

01760 CALL 

01770 LD 

01780 JP 

01790 END 



•9' 

Z,U1 

'Z' 

Z,U2 
I I 

Z,U3 
A 
(HL) ,A 

A, 'A' 
(HL) ,A 

A, (FLAG) 
A 

NZ,U8 
A 

(FLAG) ,A 
A, 'A' 
U80 
A, •0« 
(HL) ,A 



A, •0' 
(HL) ,A 
A 



402DH 



HL,PBUFF 

4467H 

Ai I 
r t 

33H 
XFER 



Ret 

Time to carry over? 

Go if so 

Make number yet? 

Go if so 

Is it a space? 

Go if so 

Bump char 

Put in PW buffer 

Ret 

A ascii 

Put in PW buff 

Ret 

Is this first char? 

Set flag 

Go if not 

Make A=l 

Put in flag 

Make char A 

Cont 

Load with ascii 

Store char 

Set overflow flag 

Ret 

Load ascii 

Store char 

Set flags 

Ret 

Flag byte 

Jump to DOS 



;Get PW to print 
; Display 

;Get coihma ascii 
; Display and ret 
; Start of program 



LOADER/BAS — Object File Load Format Displayer 

This is a DISK BASIC program that will display the load format of a 
machine-language file. It will run under any of the DISK BASICs for the Model I. 
I have not tested it, but it will probably run under the Model III also. 

When you first run the program, the prompt will come like this: 



Figure 8.4 Program Prompt 

FILE LOAD FORMAT DISPLAYER V2,l 

FILESPEC > 
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Answer the prompt with the name of the object file whose load format you wish to 
disp ay. Try entering SYSl/SYS. Now the disks will fire, Ughtning wiU strike, and the 
display will end up looking like Figure 8.5 below. (This is NEWDOS 80 SYS 1/SYS 
Yours may be different.) 



Figure 8.5 S YSl/S YS Display 



FILE LOAD FORMAT DISPLAYER V2.1 - CURRENT FILE : SYSl/SYS 



254 BYTES LOADED A 
254 BYTES LOADED A 
254 BYTES LOADED A 
254 BYTES LOADED A 
254 BYTES LOADED A 



4D00 / 
4DFE / 
4EFC / 
4FFA / 
50F8 / 



19712 
19966 
20220 
20474 
20728 



- SECTOR 



SECTOR 
SECTOR 
SECTOR 
SECTOR 



BYTE 04 
BYTE 06 
BYTE 08 
BYTE 0A 
BYTE 0C 



HIT <ENTER> TO CONTINUE 



The SECTOR, BYTE number is the relative sector and byte in which the first byte 
of this object block (not the loader codes) is stored upon the disk. This is useful for 
tracking down bytes to modify after disassembling the program. 

After hitting enter, the screen wiU clear and come up looking like the figure below. 



Figure 8.6 DOS Transfer Address Display 

FILE LOAD FORMAT DISPLAYER V2.1 - CURRENT FILE 

TRANSFER ADDRESS = 4D00 / 19712 

TOTAL NUMBER OF BYTES LOADED = 04E0 / 1248 

HIT <ENTER> TO CONTINUE 



SYSl/SYS 



This displays the DOS transfer address and the number of object bytes that are 
loaded This does not mclude any header bytes. If you encounter any HEADER 
bytes, the header block will be described as follows. 

8 HEADER BYTES 

When keying-in this program, it is unnecessary to put in a Une feed after every 
colon. I did this for readability's sake. 

p ^ A^i^v-'" •* ^VTr^Z?^"; !^^ HLESPEC prompt is displayed, it will jump to DOS 
READY via CMD S . Also, if you press the up arrow key while LOADER is 

Srl^icli?^^' ^^® ^^®''* P"°^ ^""^ ^ ^^ terminated, and come back up with the 
rlLEoPEC prompt. 
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Figure 8.5 LOADER/BAS Routine 



10 ' LOADER - VERSION 2.1 

20 ' DISPLAYS LOAD FORMAT FOR AN OBJECT FILE 

30 ' 

35 CLS 

40 CLEAR2000t 
U$="###": 
0$="#####": 
PRINT@0,"FILE LOAD FORMAT DISPLAYER V2.1" 

50 PRINT@128,CHR$(31);: ' 
LINEINPUT"FILESPEC >";F$: 
IFP$=""THENCMD"S 

60 ONERRORGOTO70: 
OPEN"I",l,F$i 
CLOSE: 

0PEN"R",1,P$: 
FIELD1,255ASA$: 
GOTO80 

70 CMD''E"i 

FORQ=1TO500: 
NEXT: 
RESUMES 

80 PRINT§32,"- CURRENT PILE : "F$;: 
PRINT@128,"": 
ONERRORGOTO0 : 

X=PEEK(VARPTR(A$) +1) +(PEEK(VARPTR(AS) +2) *256) : 
Y=X 

90 GET1,1: 
Ss2: 

PRINT@128.,CHR$(31); 
• GET FIRST SECTOR 

100 • ^ 

110 IFPEEK(&H3840)AND8THENCLOSE: f 

PRINT@34 , "ABORT DURING : ''F$CHR$(30) ; : 
RUN40 

ELSEGOSUB4000: 
GOSUB 200: 
IF AOl THEN 150 

120 GOSUB 200: 
C=A: 

IP C=0 THEN C=256 
ELSE IF C<3 THEN C=260-C 

. . . Continued Listing 
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. . . Continued Listing 

130 C=C-2: 
CB=CB+C: 
GOSUB 200: 
AD=A: 

GOSUB 200: 
A=A*256 : 
AD=AD+A 

140 PRINTUSINGU$;C;: 

PRINT" BYTES LOADED AT ";: 
GOSUB 220: 
PRINT" /";: 

PRINTAD" - SECT0R"S-2", BYTE ";: 

A=B: 

GOSUB250: 

PRINT: 

GOSUB280: 

GOTO110 

150 IF A02 THEN 180 ' GO IF NOT XFER ADDRESS 

160 GOSUB200: 
GOSUB200: 
AD=A: 
GOSUB200: 
A=A*256 : 
AD=AD+A 

170 CLOSE: 

GOSUB4006: 

PRINT"TRANSFER ADDRESS = ";: 
GOSUB 220: 
PRINT" /";: 
PRINTAD: 

PRINT"TOTAL NUMBER OF BYTES LOADED = " • • 

AD=CB: '* 

GOSUB220 : 

PRINT" /";: 

PRINTCB: 

PRINT: 

GOSUB4006: 

PRINT@34 , "LAST FILE : ''F$eHR$ (30) ; : 

RUN40 

180 GOSUB200: 
C=A: 
IFC=0 THEN C=254 

190 PRINTUSINGU$;C;: 

PRINT" HEADER BYTES": 
GOSUB280: 
\ GOTO110 

200 AsPEEK(X+B) : 
B=B+1 : 



Listing Continued . 
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. . . Continued Listing 

IFB»256THEN210 
ELSERETURN 

210 B=0: 

GET1,S: 

S»S+1: 

RETURN 

220 'PRINTS AD IN HEX 

221 IPAD>32767THENAD=AD-65536 

230 L=ADAND255: 

M= INT ( (AD/256) AND255) 

240 AsH: 

GOSUB250 : 
A»L: 

GOSUB 250: 
RETURN 

250 Z=(A/16)AND15: 
GOSUB260: 
ZsAANDl5: 
GOSUB 260: 
RETURN 

260 IFZ>9 THEN270 

ELSEPRINTCHR$ (Z+48) ; : 
RETURN 

270 PRINTCHR$(Z+55);: 
RETURN 

280 IF B+0255 THEN290 
ELSE B«B-i-C: 
RETURN 

290 B=B-l-C: 
B«B-256 : 
GET1,S: 
S=S+1: 
RETURN 

4000 IFPEEK(&H4020) >&H40ANDPEEK(&H4021) >&H3ETHEN4006 
ELSERETURN 

4006 PRINT: PRINT"HIT <ENTER> TO CONTINUE"; 

4030 A$BlNKBY$: 

IFA$sCHR$ (13) THEN4040 
ELSE4030 

4040 PRINT@128,CHR$(31) ; : 
RETURN 
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ASCIIZAP - Modify File's Sector in ASCII 

This machine-language program will display a file's sectors in hex and ASCII 
format, and allow modification of the file in the ASCII mode; There is definitely 
room for more functions in this program. Try your hand at sprucing it up a bit. 

After running the program, answer the filespec prompt. It will come up and ask 
what sector to display. After answering that, it will read the sector, and display it 
in hex and ASCII. Now you are in the COMMAND MODE. This is denoted by the 
asterisk in the upper-left corner of the screen. 

Using the ";" and the "-" keys, you may scroll sectors of the file; ";" is forward, 
and "-" is backward. 

When you wish to modify a sector type in Mnn while in the command mode (nn 
is the 2 hex digits of the position you want to start modifying). For example, M42 
would start the cursor blinking in byte position 42. The cursor will bhnk over the 
character you wish to modify. While in the modify mode, the only four characters 
that will not be actually written are: left arrow, right arrow, break, and enter. Left 
and right arrow move the cursor left and right. The break key will terminate the 
modifications, re-read the sector, and put you back in the command mode Enter 
will clear the screen and ask you if the modified sector should be written yet. If you 
answer yes, it will write the modified sector and re-display the sector, putting you 
back in the command mode. If you answer no, it will just re-display the buffer, with 
all modifications, and put you back into the command mode. 

If you hit break while in the command mode, the relative sector prompt will 
come up again. If you hit break at this point, the filespec prompt will come up. If 
you hit break now, the program will jump back to DOS READY via 402D. 

While in the command mode, if N is pressed, the contents of the buffer will be 
NEGATED using the Z-80 NEG operation. This is useful for detecting negated 
program header messages like VEE-TOS or TRISS-DOS system number zero. It 
is also useful for hiding you own scrambled messages. The negate function may be 
substituted for your own brand of scrambling. 



Figure 8.6 ASCIIZAP Routine 



00100 ; 
00110 ; 
00120 ; 
00130 
00135 ; 
00140 BUFFER 
00150 
00160 
00170 
00180 \ 
00190 \ 
00200 
00210 
00220 
00230 INITM 



ASCIIZAP - MODIFIES A FILE IN HEX/ASCII 



ORG 

EQU 

CALL 

LD 

LD 

LD 

LD 

LD 

CALL 

JP 

DEFM 



5200H 



$ 

ICdH 

HL,(400DH) 

(BTEST) ,HL 

HL,BREAKT 

(400DH) ,HL 

HL, INITM 

4467H 

ASK 



;I/0 BUFFER 

;CLS 

;GET BREAK 
; STORE IT 
;NEW ROUTINE 
; STORE 

;GET INIT MESSAGE 
/DISPLAY 
;G0 TO ROUTINE 
•ASCIIZAP VERSION 1.3 - FILE MODIFY PROGRAM* 

Listing Continued . . . 
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. . . Continued Listing 



00240 


DEFB 


10 




00250 


DEFM 


•(C/P) 1981 BY WAGSOFT - ALL RIGHTS 


00260 


DEFB 


10 




00270 


DEFB 


13 




00280 








00290 


ORG 


5300H 


; PROGRAM START 


00300 ASKM 


DEFM 


•FILESPEC? • 




00310 


DEFB 


3 




00320 MESl 


DEFM 


•RELATIVE SECTOR? ' 


00330 


DEFB 


3 




00340 DCB 


EQU 


0F100H 


;FILE DCB 


00350 INBUFF 


DEFS 


10 


; INPUT BUFFER 


00360 SEC 


DEFW 





; CURRENT SECTOR 


00370 POSN 


NOP 




;EDIT BYTE - 


00380 DISKER 


EQU 


$ 


; HANDLES DISK ERROR 


00390 


OR 


080H 


;FOR RET, NO DIAG 


00400 


JP 


4409H 


;DIS & RET 


00410 BREAKT 


CP 


1 


; BREAK? 


00420 


RET 


Z 


;RET IF SO 


00430 


DEFB 


0C3H 


;JP OPCODE 


00440 BTEST 


DEFW 





; OVERLAY ADR 


00450 BOUT 


LD 


HL, (BTEST) 


;GET LOADER 


00460 


LD 


(400DH) ,HL 


; RESTOR 


00470 


JP 


402DH 


;JP TO DOS 


00480 DISKAB 


CALL 


DISKER 


; DISPLAY 


00490 MAIN 


EQU 


$ 




00500 


LD 


SP,41FCH 


;FIX STACK 


00510 


CALL 


1C9H 


;CLS 


00520 ASK 


LD 


HL,ASKM 


;GET MESSAGE 


00530 


CALL 


4467H 


; DISPLAY 


00540 


LD 


HL,DCB 


;FILE DCB 


00550 


LD 


B,22 


;MAX INPUT 


00560 


CALL 


40H 


;LINE INPUT 


00570 


JP 


C,BOUT 


; ABORT 


00580 


LD 


A,B 


;GET AMT 


00590 


OR 


A 


;SET Z 


00600 


JR 


Z,ASK 


;G0 IF ENTER HIT 


00610 


EX 


DE,HL 


;PUT IN DE 


00620 


LD 


B,0 


;LRL=256 


00630 


LD 


HL, BUFFER 


;I/0 BUFFER 


00640 


CALL 


4424H 


;OPEN FILE 


00650 


JR 


Z,JXP 


;G0 IF OK 


00660 


CALL 


DISKER 


; HANDLE ERROR 


00670 


JR 


ASK 


;TRY AGAIN 


00680 JXP 


INC 


DE 


;BUMP TO BYTE 2 


00690 


LD 


A, (DE) 


?GET IT 


00700 


SET 


6, A 


;SET IT 


00710 


r.D 


(DE) ,A 


;D0 IT 


00720 


JR 


JIX 


?CONT 


00730 ASKS 


EQU 


$ 




00740 Jl 


CALL 


1C9H 


fcls 


00750 JIX 


LD 


HL,MES1 


', SECTOR 


00760 / 


CALL 


4467H 


;DIS 


00770 


T.D 


HL, INBUFF 


', INPUT 


00780 


LD 


B,3 


^MAX IN 



Listing Continued . 
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. . . Continued Listing 

00790 

00800 

00810 

00820 

00830 

00840 

00850 REREAD 

00860 

00870 

00880 

00890 

00900 

00910 J2 

00920 

00930 

00940 

00950 

00960 

00970 DISBUF 

00980 JX 

00990 JXl 

01000 

01010 

01020 

01025 

01030 

01040 

01050 

01060 

01070 

01080 HEXBYT 



01090 

01100 

01110 

01120 

01130 

01140 

01150 

01160 

01170 

01180 

01190 

01200 PUTNIB 

01210 

01220 

01230 

01240 

01250 PNAA2 

01260 

01270 

01280 PNAAl 

01290 

01295/; 

01300^ ; 

01310 ; 



CALL 

JP 

CALL 

PUSH 

POP 

LD 

LD 

LD 

CALL 

JR 

CALL 

JR 

CALL 

JR 

CP 

JR 

CALL 

JR 

EQU 

CALL 

CALL 

XOR 

LD 

JP 



40H 

C,MAIN 

GETINP 

DE 

BC 

(SEC) ,BC 

BC, (SEC) 

DE,DCB 

4442H 

Z,J2 

ERROR 

Jl 

4436H 

Z,JX 

6 

Z,JX 

ERROR 

Jl 

$ 

1C9H 

PAGE 

A 

(POSN) ,A 

KEYIN 



ROUTINE : HEXBYT 
PUT ASCII DISPLAY 
REGS ALTERED : HL 
SUPPORT : NONE 



;LINEIN 

;G0 IF FIN 

;GET NUMBER 

;PAS& TO BC 

;GET REC 

;SAVE 

;GET CURRENT 

;DE=DCB 

;POSN TO REC 

;G0 IF OK 

;GOTO ERROR 

;ASK NEXT SEC 

;READ 

;G0 IF OK 

;PROT SEC? 

;0K 

;DIS 

;DISPLAy BUFFER 

;CLS 

; DISPLAY 

;CLR 

; STORE POSN 

;G0 TEST 



IN HEX OF 'A' AT (HL) 
= LAST PUT ASCII+1 



EQU 

PUSH 

RLCA 

RLCA 

RLCA 

RLCA 

CALL 

POP 

PUSH 

CALL 

POP 

RET 

EQU 

AND 

CP 

JR 

ADD 

LD 

INC 

RET 

ADD 

JR 



$ 
AF 



PUTNIB 

AF 

AF 

PUTNIB 

AF 

$ 

0FH 

10 

NC, PNAAl 

A,30H 

(HL) ,A 

HL 

A,55 
PNAA2 



ROUTINE : NEXTC 
GET NEXT NON- SPACE 



;SAVE BYTE 

; SHIFT MSN TO LSN 



/CONVERT NIBBLE 
/RESTORE BYTE 
; RE- SAVE 
/CONVERT NIBBLE 
/RESTORE BYTE 
/RETURN 

/STRIP NIBBLE 

/OVER DECIMAL? 

/GO IF SO 

tKDD TO ASCII DISPLAY 

/STORE BYTE 

/BUMP PTR 

/RETURN 

/FOR HEX AJUST 

/PUT & RET 



CHAR FROM (HL) STREAM 

Listing Continued . 
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. . . Continued Listing 






01320 


t 


EXIT HL 


IS POSN OVER 


CHAR, C SET IF CHAR WAS CR 


01330 


f 








01340 1 


SEXTC 


LD 


A,{HL) 


;GET CURRENT CHAR 


01350 




INC 


HL 


;BUMP TO NEXT CHAR 


01360 




CP 


1 1 


; SPACE? 


01370 




JR 


NZ,NEXTCA 


;G0 IF NOT 


01380 




JR 


NEXTC 


;G0 IP SPACE 


01390 NEXTCl 


CP 


13 


;C/R? 


01400 




JR 


Z,NEXTC2 


;G0 IP C/R 


01410 




OR 


A 


; RESET CARRY 


01420 




RET 




; RETURN 


01430 NEXTC2 


SCF 




;SET CARRY 


01440 




RET 




/•RETURN 


01445 i 


} 








01450 ; 




TAKES NEXT DECIMAL INPUT AT (HL) AND PUTS IT IN 


01460 i 




DE. C SET IS NUMBER 


WAS BIGGER THAN 65530 


01470 i 




ALL REGS USE. HL»CHAR AFTER LAST NUMBER 


01480 i 


f 








01490 ( 


3ETINP 


EQU 


$ 




01500 




LD 


DE,0 


;ZERO 


01510 ( 


3ETIN1 


CALL 


NEXTC 


;GET NEXT CHAR 


01520 




CP 


13 


; C/R? 


01530 




RET 


Z 


; RETURN IF EOL 


01540 




CP 


101 


; UNDER 0? 


01550 




JR 


CrGKTEND 


; RETURN IF END OF NUMBER 


01560 




CP 


1 . 1 

• 


;OVER 9? 


01570 




RET 


NC 


; RETURN IF OVER 9 


01580 




PUSH 


HL 


J SAVE LINE PTR 


01590 




LD 


HL,1998H 


;GET # TO TEST 


01600 




EX 


AF,AF' 


;SAVE CHAR 


01610 




RST 


18H 


; COMPARE 


01620 




JR 


CGETBIG 


;G0 IF TOO BIG 


01630 




EX 


AF,AF' 


; RESTORE # 


01640 




EX 


DE,HL 


; SWITCH FOR ADD 


01650 




PUSH 


HL 


;PASS TO DE 


01660 




POP 


DE 


;GET CUR # 


01670 




ADD 


HL,HL 


; TIMES BY 10 


01680 




ADD 


HL,HL 




01690 




ADD 


HL,DE 




01700 




ADD 


HL,HL 




01710 




SUB 


30H 


/•ADJUST TO NUMBER 


01720 




LD 


E,A 


;PUT IN DE 


01730 




T.D 


D,0 


; CLEAR 


01740 




ADD 


HL,DE 


;ADD TO ACCUM 


01750 




EX 


DErHL 


;PUT IN DE 


01760 




POP 


HL 


; RESTORE PTR 


01770 




JR 


GETINl 


;LOOP BACK 


017 80 C 


SETBIG 


POP 


HL 


/•RESTORE PTR 


01790 




EX 


AF,AF' 


;GET THIS CHAR 


01800 




SCF 




;T00 BIG ERROR 


01810 




RET 




/•RETURN 


01820 C 


;ETEND 


OR 


A 


/•CLEAR CARRY 


01830 




RET 




/•RETURN 


01840 ; 










01850 ; 




DISPLAY 


BUFFER TO SCREEN 










Listing Continued . . . 
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. . . Continued Listing 
01860 ; 

01870 PAGE EQU 

01880 LD 

01890 LD 

01900 LD 

01910 J3 PUSH 

01920 PUSH 

01930 CALL 

01940 POP 

01950 CALL 

01960 LD 

01970 ADD 

01980 POP 

01990 DJNZ 

02000 LD 

02010 LD 

02020 XOR 

02030 LEW CALL 

02040 ADD 

02050 LD 

02060 ADD 

02070 DJNZ 

02080 RET 

02090 LINE LD 

02100 LWl LD 

02110 CALL 

02120 INC 

02130 LD 

02140 INC 

02150 CALL 

02160 INC 

02170 DJNZ 

02180 RET 
02190 ERROR PUSH 

02200 CALL 

02210 POP 

02220 CALL 

02230 LD 

02240 CALL 

02250 LD 

02260 LD 

02270 CALL 

02280 CALL 

02290 RET 

02300 MESSO DEFM 

02310 DEFB 

02320 LINEA LD 

02330 J5 LD 

02340 INC 

02350 CP 

02360 JR 

02370 CP 

02380 JR 

02390 J6 LD 

02400 INC 



HL,3C08H 


; START OF DISPLAY 


DE, BUFFER 


;I/0 BUF 


3,16 


;LINE TO DISPLAY 


EC 


;SAVE COUNT 


DE 


; SAVE BUFFER 


LINE 


;LINE HEX 


DE 


;RESTdR 


LINEA 


;LINE ASCII 


EC, 8 


;AMT TO ADD 


HL,BC 


;PUT TO LINE 


BC 


;GET COUNT 


J3 


fLOOP 16 TIMES 


HL,3C04H 


fFOR BYTE ADR 


B,16 


?D0 16 TIMES 


A 


?CLR 


HEXBYT 


f DISPLAY 


A,10H 7 


?BUMP TO NEXT LINE 


DE,62 


rBUMP ONE LINE 


HL,DE < 


;ADD ONE LINE 


LEW i 


ILOOP 


■1 


? RETURN 


B,8 i 


l8 PAIRS 


A, (DE) i 


'GET BYTE 


HEXBYT i 


rDISPAL 


DE J 


"BUMP 


A, (DE) ; 


GET NEXT 


DE 4 


•BUMP BUFF 


HEXBYT ; 


DISPLAY 


HL J 


BUMP 


LWl ; 


DO 8 TIMES 


1 


RET 


AF ; 


SAVE 


1C9H ; 


CLS 


AF ; 


GET ERROR 


DISKER ; 


DIS 


HL, MESSO ; 


GET Q 


4467H 


DIS 


B,0 


NO INPUT 


HL,INBUFF 


BUFFER 


40H 


INPUT & RET 


1C9H 


CLS 


; 


RET 


'HIT <ENTER> TO C 

3 

B,16 


lONTINUE' 


#BYTES 


A, (DE) 


GET BYTE 


DE ; 


BUMP 


32 


UNDER? 


C,J4 


GO IF UNDIS 


192 


TO HFG 


NC,J4 


UNDIS 


(HL) ,A ; 


DISPLAY 


HL 


BUMP 




Listing Continued 
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02410 


DJNZ 


J5 


;D0 16 TIMES 


02420 


RET 




;RET 


02430 J4 


LD 


A > > 


;UNDIS 


02440 


JR 


J6 


;CONT 


02450 r 








02460 KEYIN 


EQU 


S 




02470 


CALL 


49H 


;GET KEY 


02480 


GP 


•;• 


;FOR? 


02490 


JR 


Z,FOR 


;G0 IF SO 


02500 


CP 


i_ • 


;BACK 


02510 


JR 


ZrBACK 


;G0 IF BACK 


02520 


CP 


1 


; BREAK? 


02530 


JP 


Z,J1 


;ASK NEXT SEC 


02540 


CP 


•M' 


; MODIFY? 


02550 


JR 


Z,MOD 


;G0 IF SO 


02560 


CP 


•R* ' 


; REREAD? 


02570 


JP 


Z, REREAD 




02580 


CP 


•N" 


; NEGATE? 


02590 


JP 


Z, NEGATE 




02600 


JR 


KEYIN 


;LOOP 


02610 NEGATE 


LD 


HL, BUFFER 


;GET BUF 


02620 


LD 


Br0 


;256 TIMES? 


02630 Nl 


LD 


A,(HL) 


;GET BYTE 


02640 


NEG 






02650 


LD 


(HL),A 




02660 


INC 


HL 




02670 


DJNZ 


Nl 




02680 


CALL 


PAGE 




02690 


JR 


KEYIN 




02700 FOR 


LD 


HL, (SEC) 


;GET SEC 


02710 


INC 


HL 


;ADD ONE 


02720 FIX 


LD 


(SEC) ,HL 


; STORE 


02730 


JP 


REREAD 


;READ NEXT 


02740 BACK 


LD 


HL, (SEC) 


;GET SEC 


02750 


DEC 


HL 




02760 


JR 


FIX 




02770 ; 








027 80 ; 


MODIFY 


HANDLER 




02790 ; 








02800 MOD 


EQU 


$ 




02810 


LD 


(3C00H),A 


; DISPLAY 


02820 


CALL 


49H 


;GET CHAR 


02830 


LD 


(3C40H) ,A 


;DIS 


02840 


CALL 


CONV 


;CONV 


02850 


JP 


C,BADM 


;G0 IF BAD 


02860 


RLCA 






02870 


RLCA 






02880 


RLCA 






02890 


RLCA 






02900 


AND 


0F0H 


;PUT IN HI NIB 


02910 


POSH 


AF 


;SAVE 


02920 


CALL 


49H 


;GET NEXT 


02930 


LD 


(3C80H) ,A 


;DIS 


02940 


CALL 


CONV 


; CONVERT 


02950 


JP 


C,BADM 


;G0 IF ERROR 

Listing Continued 
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02960 


LD 


B,A 


;GET # 




02970 


POP 


AF 


;GET FIRST 




02980 


OR 


B 


;ADD BITS 




02990 


LD 


(POSN) ,A 


; STORE POSN 




03000 


CALL 


CLR 


;CLR LEFT 




03010 MODI 


CALL 


POSNX 


;POSN HL & DE 




03020 


CALL 


jfNKEY 


;GET INPUT FLASH 




03030 


CP 


1 


; BREAK 




03040 


JP 


Z, REREAD 


;G0 IF ABORT MOD 




03050 


CP 


8 


;BACK 




03060 


JR 


Z,BS 






03070 


CP 


9 


;FOR 




03080 


JR 


Z,FS 






03090 


CP 


13 


; WRITE 




03100 


JR 


Z, WRITE 


; WRITE 




03110 


LD 


(DE) ,A 


/•WRITE BYTE 




03120 


LD 


A, (POSN) 


;GET POSN 




03130 


INC 


A 






03140 


LD 


(POSN) ,A 


;INC IT 




03150 


CALL 


PAGE 


/•DISPLAY 




03160 


JR 


MODI 


; CONT 




03170 BS 


CALL 


FF 






03180 


LD 


A, (POSN) 






03190 


DEC 


A 






03200 F9 


LD 


(POSN) ,A 


;BACK 




03210 


JR 


MODI 


; CONT 




03220 FS 


CALL 


FF 






03230 


LD 


A, (POSN) 






03240 


INC 


A 






03250 


JR 


F9 


/•FORWARD 




03260 FF 


LD 


A, (CUR) 






03270 


LD 


(HL) ,A 






03280 


RET 








03290 MES90 


DEFM 


•WRITE MODIFIED 


SECTOR? (Y/N/P) ' 




03300 


DEFB 


13 






03310 WRITE 


CALL 


1C9H 






03320 


LD 


HL,MES90 






03330 


CALL 


4467H 






03340 F70 


CALL 


49H 






03350 


T.D 


DE,DCB 


;l/0 FCB 




03360 


CP 


1 






03370 


JP 


Z,ASKS 






03380 


CP 


•N' 






03390 


JP 


Z,NO 






03400 


CP 


.yl 






03410 


JR 


Z,FW 






03420 


CP 


.p. 


; PROT? 




03430 


JR 


NZ,F70 


/•NO 




03440 


LD 


A, (DE) 


;GET 




03450 


OR 


1 


; WRITE PROT 




03460 


JR 


SD3 


./•CONT 




03470 FW 


LD 


A,(DE) 


/•GET FCB BYTE 




03480 


RES 


0,A 


;PROT OFF 




03490 SD3 


LD 


(DE) ,A 


;XFR TO FCB 




03500 


LD 


HL, BUFFER 




^ 








Listing Continued 
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. . Continued Listing 



03510 


LD 


BC,(SEC) 




03520 


CALL 


1C9H 




03530 


CALL 


4442H 




03540 


CALL 


443CH 


; WRITE A: V^^'^*^ 


03550 


JP 


Z,JX1 


;CONT 


03560 


CALL 


ERROR 




03570 


JP 


ASI^S 




03580 KEYLO 


EQU 


$ 




0359,0 BADM 


CALL 


CLR 


;CLR LEFT 


03600 


JP 


JXl 


;GET SEC 


03610 CLR 


LD 


HL,3C00H 


?GET SCREEN 


03620 


LD 


DEr64 


?# TO CLR 


03630 


LD 


B,16 


?# TO CLR 


03640 Bl 


LD 


(HL) ,32 


fCLR 


03650 


ADD 


HL,DE 


?BUMP NEXT 


03660 


DJNZ 


Bl 


FDO 16 TINES 


03670 


RET 




fRET 


03680 CONV 


CP 


•0' 


FNON num? 


03690 


RET 


■':c 


;RET BAD 


03700 


CP 


•G" 


fNOPE 


03710 


JR 


NC,BADC 


?G0 IF PAST 


03720 


CP 


I.I 

• 


?NUM? 


03730 


JR 


C, GOODC 


?G0 IF SO 


03740 


CP 


•A' 


FBAD? 


03750 


JR 


C,BADC , 


?G0 IF SO 


03760 


SUB 


55 


rMAKE REAL 


03770 CI 


OR 


A , 


?KILL C . 


03780 


RET 




?RET 


03790 GOODC 


SUB 


48 ! 


INAKE REAL 


03800 


JR 


CI 


fCONT 


03810 BAOC 


SCF 




rERR 


03820 


RET 




?RET 


03830 POSNX 


EQU 


$ ; 


f POSITION HL,DE 


03840 


LD 


A, (POSN) j 


fGET POSN 


03850 


PUSH 


AF , 


?SAVE POSN 


03860 


LD 


HL,3C00H-l-48 j 


(GET POSN START 


03870 


LD 


DE,64 j 


lAMT TO ADD 


03880 PI 


SUB 


16 j 


ION THIS LINE? 


03890 


JR 


C,P2 i 


IGO IF YES? 


03900, 


ADD 


HL,DE i 


rNEXT LINE 


03910 


JR 


PI I 


fTRY AGAIN 


03920 P2 


AND 


0FH J 


rGET LINE POSN 


03930 P3 


JR 


ZfP4 ; 


•GO IF OK 


03940 


INC 


HL ; 


-BUMP 


03950 


DEC 


A i 


SUBl 


03960 


JR 


P3 ; 


RETRY 


03970 P4 


POP 


AF J 


GET POSN 


03980 


PUSH 


HL J 


SAVE POSN 


03990 


LD 


HL, BUFFER ; 


GET 10 START 


04000 


LD 


E,A ; 


FOR OFFSET 


04010 


LD 


D,0 ; 


CLR 


04020 


ADD 


HL,DE ; 


GET BUFFER POSN 


04030 


EX 


DE,HL ; 


PUT IN DE 


04040 


POP 


HL ; 


GET SCREEN 


04050 


RET 




RET 

Listing Continued . 
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. . . Continued Listing 






04060 


INKEY 


EQU 


$ 


; FLASHING INPUT 


04070 




LD 


A, (HL) 


;GET CHAR 


04080 




LD 


(CUR) ,A 


; STORE 


04090 


IKK 


PUSH 


DE 


; SAVE 


04100 




CALL 


2BH 


;GET INPUT 


04110 




OR 


A 


;SET F 


04120 




POP 


DE ' 


;RESTOR 


04130 




RET 


NZ 


;IF OK 


04140 




LD 


A, (COUNT) 


/•GEY COUNT 


04150 




INC 


A 




04160 




LD 


(COUNT) ,A 


/•UPDATE 


04170 




cp 


100 


; FLASH? 


04180 




JR 


NZ,IKK 


;LOOP 


04190 




LD 


A, (HL) 


;GET SCREEN 


04200 




CP 


143 


; CUR? 


04210 




JR 


Z,F1 


;G0 IF SO 


04220 




LD 


(CUR) ,A 


; STORE CHAR 


04230 




LD 


(HL) ,143 


;CUR 


04240 


F2 


XOR 


A 




04250 




LD 


(COUNT) ,A 


; RESET 


04260 




JR 


IKK 




04270 


Fl 


LD 


A, (CUR) 


;GET CHAR 


04280 




LD 


(HL) ,A 


; DISPLAY 


04290 




JR 


F2 


; CONT 


04300 


COUNT 


NOP 






04310 


CUR 


NOP 






04320 


NO 


CALL 


1C9H 




04330 




CALL 


PAGE 


■' 


04340 




JP 


KEYIN 




04350 




END 


5200H 
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Miscellaneous Junk 

Below is a quick-reference chart of the Western Digital FD1771 Floppy Disk 
Controller commands and status bits. 

Figure 9. 1 FDl 771 Commands and Status Bits 



Command Command 
Type Name 

1 Restore 

1 Seek 

1 Step 

1 Step-in 

1 Step-out 

2 Read Sector 

2 Write Sector 

3 Read Address 
3 Read Track 

3 Write Track/Format 

4 Force Interrupt/Reset 



Bits 
76543210 







1 
10 

1 1 



1 

1 
1 
1 
1 



1 
1 




r 
r 
r 
r 
r 



H V 

1 H V 
U H V 
U H V 
U H V 
B E 
B E t 

E 

10 

10 





STATUS BIT DURING TYPE 1 COMMANDS. 
Drive Select, Any Head Movement. 



6 5 4 3 2 10 



U: 



Busy - operation in progress. 
Index hole sync with sensor. 
Head is at track zero. 
CRC error during track verify. 
Desired track was not verified. 
Head is loaded and engaged. 
Disk in drive is write protected. 
Not Ready - drive motors off. 

Listing Continued . 
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. .Continued Listing 



DURING TYPE 2 COMMANDS. 
Read Sector (s) / Write Sector (s) 



V 6543210 



LL 



,Busy - operation in progress. 
Data request. 
Lost data. 
CRC error. 
Record not found, 

Rec type read/write fault on write, 
Rec type on read, write prot on write, 
Not ready - drive motors off. 



DURING TYPE 3 COMMANDS. 

Write Track (Format) , Read Track, Read Address. 



Busy - operation in progress. 

Data request. 

Lost data, 

<Unused> 

<Unused> 

V/rite fault on write unused on read, 

Write prot on write unused on read. 

Not Ready - drive motors off^ 



6 ; 


5 ' 


ft : 


} : 


2 1 




L 

























Stepping Speeds of Popular Drives 

Below is a list of the stepping speeds for most drives available for the TRS-80 
Model I. 



Figure 9.2 Drive Stepping Speeds 



Brand 



Max Stepping Speed, 



Tandon (all track capacities) 
^^^ 40 track 

X^fta 40 track 

Matchless 40 track 

Micropolis 5/77 track 

Shugart SA400 
Tandy (older shugart SA400) 



6 ms. 

6 ms. 
X2 ms. 
12 ms. 
40 ms. 
40 ms. 
40 ms. 
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Small Disk Operating System (S/OS) 

This chapter contains the small, but potentially powerful, disk operating system 
called 'S/OS' (which means Small Operating System). The S/OS system utilizes just 
about every disk and interrupt function described in this book, S/OS does not 
manage disk space, nor does it use or acknowledge a directory. But with a little 
programming on your end, this is quite possible. The main purpose of S/OS is to give 
you an idea on how a system is put together. S/OS may be used in special 
applications where all disk space is to be utilized. With S/OS you may access sectors 
on the disk in one of two ways: direct, i.e., you tell it in what drive, track and sector 
you want to access, or by the Relative Sector number from a given point (track and 
sector) on the disk. 

Relative file offsets may be defined so that disk partitioning be logical to any 
programs you might use with S/OS. S/OS allows logical record lengths of 1 to 256 
bytes per record. S/OS will automatically span sectors to fulfill a record access 
(when a record is spanned over two sectors). Also byte I/O routines via the ROM 
calls, 13 and IB, are supported. Tile' access is done with File Control Blocks (FCB) 
just like a regular disk operating system. The FCB's in S/OS are 1 1 bytes long, and a 
technical description is discussed later. 

S/OS is designed in such a way that various non-standard disk drivers may be 
assigned to one or more drives. This technical information is also explained later. 

S/OS allows programs to enqueue an interrupt routine that can be executed by the 
interrupt processor every 25 milliseconds. There are 10 ^slots' that may be defined 
or released by using various calls. These calls will be explained in the technical 

section. 

S/OS was written using the ASSEM/80 editor/assembler, and is compatible with 
EDAS, and ALDS. All lines using DM for DEFM, and DB for DEFB may have to be 
modified in order to be assembled correctly by your assembler. Check your 
editor/assembler reference manual. 

Technical Information Section 
S/OS Call Vectors 

S/OS is composed of tv/o programs — 

1. The S/OS Main Module. 

2. The S/OS User Interface (this accepts keyboard input). All the disk I/O, FCB I/O, 
interrupt and special routines are contained in the S/OS main module. A number of 
routine entry vectors are used so that if you make changes to the S/OS main module, 
program compatibility will still exist. 

S/OS does not use files like TRSDOS, but, as previously stated, S/OS has a way 
of doing a sort-of file I/O. File I/O in S/OS is simply done by using a FCB that 
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'points' to the file's first sector number (track and sector), then 'record' access is 
done by relative record number. The logical record length may be 1 to 256 bytes 
long. S/OS will span sectors to move a record, which allows maximum use of your 
disk space. 

Here are the S/OS operation call vectors. Their respective vector addresses are in 
hex. 



Disk I/O Primitives 

Disk I/O primitives allow you to directly read and write to specified disk sectors. 
When calling these routines (disk I/O primitives) Register 'C always contains the 
relative Drive Number in binary {NOT ASCII!). Register pair 'HL' always points to 
the I/O Buffer (if required). Register 'D' contains the Track number, and 'E' 
contains the Sector number. Upon exit, Register 'A' always contains an error code. If 
the NZ flag is set, then 'A' contains an error code, otherwise no error occured. This 
error return scheme is used by all routines that use Disk I/O in any way. All registers 
are intact upon return unless stated otherwise. 



4600 



Seek a drive's head to a desired track. 

Entry: c = drive number 
D = track number 

Exit: A = error code if NZ set 



4603 Select a desired drive 

Entry: c = drive number 

Exit: The A register is altered. 

No error can occured with this call. 



4606 



^®hH? S^^ ^J'^t'^^ ^^ on-line, contains 
a diskette and the door is closed. 

Entry: c = drive number 

Exit: A = error code if NZ 



4609 Read a disk sector 

Entry: C = drive number 
D * track number 



Listing Continued . 
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Continued Listing 



Exit: 



E = sector number 

HL -> 256 byte I/O buffer to put data 

A = error code if NZ set 



460C Read a disk ID address field. 

This routine is defined but is not implemented, 

Entry; C = drive number 
HL -> I/O buffer 



Exit: 



A = error code if NZ set 



4612 Write a disk sector 

Entry: C = drive number 
D = track number 
E = sector number 
HL -> 256 byte I/O buffer that contains data 



Exit: 



A - error code if NZ set 



4615 Write a read-protected disk sector 

Entry: C = drive number 
D = track number 
E = sector number 
HL -> 256 byte I/O buffer that contains data 



Exit: 



A ^ error code if NZ set 



4618 Format a track of data 

This function is defined but not implemented 

Entry: C = drive number 
D = track number 
HL -> 256 byte I/O buffer that contains data 

Exit: A = error code if NZ set 

461B Initialized a desired drive 

This seeks the head to track and syncs the DCT 

Entry: C = drive number 

Exit: A = ^error code if NZ set 
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S/OS File I/O Vector Calls 



These calls are used to initiate, access and close a S/OS file. 



461E 



Open a file control block (PCB) . 

This creates a FCB that is used for doing file I/O. 



Entry: C = drive number 

,^n 7 logical record length 

DE -> 11 byte PCB 

HL -> 256 byte sector I/O buffer 



Exit: 



A = 



errot code if NZ set 



4621 



Close a file control block (PCB) . 

anv^«i°^-^ tJ^i^ ^^^' A ^l°«e consists of writing 
any data in the buffer that has not been written ?o 

?/S';nl"r^??d^J;S S?iS\^^? ?/?• I'r <^-""^yte° 

rpSSfcS! ^"^^^° isn't'S^it\^^^inai'^!ttrfS;f f"^^ 

a POSN call is done or a CLOSE is done. 
Entry: DE -> PCB 



Exit: 



A = error code if NZ set 



4624 



4627 



Define the starting sector of a FCB 

allows you to define the sharUn^ o2if "®^^ne call 
the disk, "«m»e tne starting sector anywhere on 

entry: DE -> PCB 

H = starting track 
L f» startling sector 

Position the PCB for a record read. 

entry: DE -> PCB 

BC = Logical record to access. 

Listing Continued . . . 
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Continued Listing 

462A 



462D 



4630 



Read the next record 

This reads the next record currently in the FCB. 
After the record is read, the FCB points to the next 
record* 

entry: DE -> FCB ' 

HL -> Record buffer address. Not used if 
LRL = 256. Record buffer is NOT the 
256 byte sector buffer. 

exit: A = error code if NZ set 

Write the next record 

This reads the next record currently in the FCB. 
After the record is written, the FCB points to 
the next record. 

entry: DE -> FCB 

HL -> Record buffer address. Not used if 
LRL = 256. Record buffer is NOT the 
256 byte sector buffer. 

exit: A = error code if NZ set 

Load an object file 

This loads a machine-langauge program into memory. 
The sectors, obviously, must be in sequencial order. 

entry: DE -> FCB 

exit: HL -> transfer address (program start 
address) 
A = error code if NZ set 



S/OS Special Function Calls 



4633 Display an error code 



.i 



■ ^ 
This will display the error code number in 'A' to the 
video in this manner: 



SYSTEM ERROR: 10 

The number is in decimal. 



Listing Continued . 
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The S/OS User Intetface 

. . . Continued Listing 

entry: A = error code 

exit: All registers altered (not primes) 



4636 
4639 
463C 



Display a line of text to the video. 
Send a line of text to the line printer. 
Output a line to a device, ' 

The text must be terminated by a 'eD' which is 
transmitted or an 03 which is not transmitted. 



entry: 
exit: 



HL -> text to display or print, 

DE -> DCB (463C call only). 

All registered altered (not primes) . 



See Microsoft BASIC decoded & other mysteries, published by IJG, Inc., 
for more information about the BASIC ROM deviie routine. 

464B Enqueue an interrupt routine 

These calls allow you to enqueu/dequeue routine (s) to 
be serviced every 25 milliseconds (40 times/second) 

entry: A = slot to enqueue 0-9 
HL -> routine address 



464E Dequeue an interrupt routine 

entry: A = slot to dequeue 0-9 



The S/OS User Interface 

The S/OS User Interface simply provides a way for you to enter three numbers, 
which are used as a drive, track and sector address where a machine- langauge 'file' is 
to be loaded. This allows invocation of any of your programs. 

When S/OS is booted up, it will announce itself and prompt you for an input like so: 
S/OS 

9 

Enter the drive, track and sector as shown below: 

S/OS 
? 0,5,0 

The preceding would be interpreted as drive 0, track 5, sector 0. S/OS will attempt 
to load from this disk address. If it can't, an error will be displayed. 
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Byte 

The drive number in binary 

1 The drive's select code 

2 drive status: 



Bit 

7 Undefined • 

6 Undefined. 

5 Dry select delay (1 =.5 sec vs, 1.0 sec). 

4 Undefined. 

3 Undefined. 

2 Undefined. 

1 Undefined. 

Drive has been initialized. 



3 Default directory track. Not currently used. 

4 The drive's current track number 

5 Drive's track capacity. 

6 The head step-rate bits. 0, 1/ 2 or 3. 



Drive Control Tables 

Each drive has its own drive control table. This table contains information on each 
drive, such as its track capacity, its select code and other vital information. 



Machine-language Disk I/O 143 



Auc; o/vro f uc? ^UULX'UI xiiucik 



The S/OS File Control Block 

Here is a description of what the bytes in the file control block are used for: 
Bytes 7, 8 and 9 make up a "relative byte address" in a file. 



Byte 

FCB Control Byte. 80H = file is open 

1 Status Byte 

7 Unused 

6 Unused 

5 Unused 

4 Unused 

3 Unused 

2 Unused 

1 A 1 means buff contains data to be written 

A 1 means buff contain "next" sector 

2 LSB of 256-byte sector buffer address 

3 MSB of 256-byte sector buffer address 

4 Starting sector number of file 

5 Starting track number of file 

6 Drive number 

7 Byte Offset within "next' sector 

8 LSB of 'next' sector 

9 MSB of 'next' sector 
10 Logical record length 
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00001 
* • * 

S/OS - SMALL/OPERATING SYSTEM 



* 



00002 


;** 


00003 


. ** 


00004 


;** 


00005 


;** 


00006 


;** 



VERSION 1.0 - MODEL I 
create!): 07/28/82 
UPDATED: 08/06/82 
(C) 1982 by Michael Wagner 



* 



00007 
************************************************************* 

00008 







00009 


; 


Label 


equates 






00010 


; 






0000 


7850 


00011 


@@@@@@ 


DW 


EOP 


37 EF 




00012 


DATA 


EQU 


37EFH 


37 EC 




00013 


CMD 


EQU 


37ECH 


37 ED 




00014 


TRACK 


EQU 


37EDH 


37 EE 




00015 


SEC 


EQU 


37EEH 


37 E0 




00016 


SEL 


EQU 


37E0H 


37 E0 




00017 


INTRST 


EQU 


37E0H 


4500 




00018 
00019 


BUFF 

• 


EQU 


4500H 


402D 




00020 
00021 


s 
t 


ORG 


402DH 


402D 


C33B4F 


00022 


ejpDos 


JP 


JPDOS 


4030 


C33B4F 


00023 


@ABORT 


JP 


JPDOS 


4033 


C3C94C 


00024 
00025 


@BYTIO 

;• 


JP 


BYTEIO 


400C 




00026 
00027 


f 


ORG 


400CH 


400C 


C9 


00028 




RET 




400D 


00 


00029 




NOP 




400E 


00 


0003]9 




NOP 




400F 


C9 


00031 




RET 




4010 


00 


00032 




NOP 




4011 


00 


00033 




NOP 




4012 


C30049 


00034 
00035 


• 
1 


JP 


INTER 


4600 




00036 
00037 


f 


ORG 


4600H 


4600 


C3404A 


00038 


@SEEK 


JP 


SEEK 


4603 


C3444A 


00039 


eSELEC 


JP 


SELECT 


4606 


C3484A 


00040 


@VALID 


JP 


VALID 


4609 


C34C4A 


00041 


@RSEC 


JP 


RSEC 


460C 


C3504A 


00042 


QRADR 


JP 


RADR 


460F 


C3544A 


00043 


QRCYL 


JP 


RCYL 


4612 


C3584A 


00044 


@WSEC 


JP 


WSEC 


4615 


C35C4A 


00045 


@WSECP 


JP 


WSECP 



; VECTORS 

; ENTRY DIRECT 
; ENTRY 

; ABNORMAL ENTRY 
;D0 BYTE I/O 

;INTERUPT VEC 

; BREAK VEC, RST28 



; DEBUG TRAP, 
;RST30 



; INTER VEC, RST38 

; VECTOR AREA 

;SEEK TRK 

; SELECT DRV 

; VALIDATE DRV 

;READ SEC 

;READ ADDRESS 

;READ TRK 

; WRITE SEC 

; WRITE SEC READ 

;PROT 

Listing Continued . . . 
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4618 C3604A 


00046 @FORMT 


JP 


FORMAT 


/FORMAT TRK 


461B C3644A 


00047 eiNITD 

00048 ; 


JP 


INITD 


;INIT DRV 


461E C3194C 


00049 eOPEN 


JP 


OPEN 


; CREATE FCB 


4621 C3544C 


00050 @CLOSE 


JP 


CLOSE 


; CLOSE FCB 


4624 C36C4C 


00051 QDEFIN 


JP 


DEFIN 


; DEFINE STARTING 


4627 C39B4C 


00052 @POSN 


JP 


POSN 


; SEC 

;POSN FCB TO 


462A C3734D 


00053 @READ 


JP 


READ 


; BYTE/SEC 

;READ NEXT RECORE 


462D C3974D 


00054 @WRITE 


JP 


WRITE 


; WRITE NEXT REG 


4630 C3534E 


00055 @LOAD 

00056 ; 


JP 


LOAD 


;LOAD FILE 


4633 C3FD4E 


00057 @ERROR 


JP 


ERRORD 


; ERROR DISP 


4636 C3B94D 


00058 @LINE 


JP 


LINE 


/DISPLAY LINE 


4639 C3B44D 


00059 @PRINT 


. JP 


PRINT 


; PRINT LINE 


463C C3BC4D 


00060 @DEV 


JP 


DEV 


; DEVICE LINE 


463F C30E4E 


00061 @CI2 


JP 


CI2 


/OUTPUT 
;DEC CONV 


4642 C3084E 


00062 @CI3 


JP 


CI3 


f *^ *jx^ x^^^^v V 


4645 C3024E 


00063 @CI4 


JP 


CI4 




4648 C3FC4D 


00064 @CI5 


JP 


CI5 




464B C3E64E 


00065 @ENQUE 


JP 


ENQUE 




464E C3F84E 


00066 @DEQUE 

00067 ; 


JP 


DEQUE 




4700 


00068 
00069 ; 


ORG 


4700H 


;PAGE 47 VARS 


4700 00 


00070 TICKS 


NOP 




'; REALTIME CLK 


4701 00 


00071 SECS 


NOP 






4702 00 


00072 WINS 


NOP 






4703 00 


00073 HOURS 

00074 ; 


NOP 






4704 00 


00075 YEAR 


NOP 




;DATE 


4705 00 


00076 DAY 


NOP 






4706 00 


00077 MONTH 
0007 8 ; 


NOP 






4707 0052 


00079 USER 


DW 


5200H 


;USR MEM STA 


4709 FFFF 


00080 HIMEM 


DW 


0FFFFH 


;MEM PROT PTR 


470B 0000 


00081 


DW 





;RESV 


470D 6E49 
470F 6E49 


00082 INTQUE 
00083 


DW 
DW 


RETINT 
RETINT 


;interupt queues 


4711 6E49 


00084 


DW 


RETINT 




4713 6E49 


00085 


DW 


RETINT 




4715 6E49 


00086 


DW 


RETINT 




4717 6E49 


00087 


DW 


RETINT 




4719 6E49 


00088 


DW 


RETINT 




471B 6E49 


00089 


DW 


RETINT 




471D 6E49 


00090 


DW 


RETINT 




471F 6E49 


00091 


DW 


RETINT 




4721 


00092 INTEND 

00093 ; 


EQU 


$ 






00094 ; 


VARIABLE TABLE 






00095 ; 








4800 


00096 


ORG 


4800H 
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00196 


• 


















00197 


; 


DRIVE ( 


CONTROL TABLES 








00198 


; 














4A00 




00199 
00200 


; 


ORG 




4A00H 








4A00 




00201 
00202 


DCTM 

• 

r 


EQU- 


t 


4 AH 






;MUST=MSB OF 
; TABLE ST A 


4A00 


104A 


00203 


DCT 


DW 




DCT0 






;DCT PTRS 


4A02 


1C4A 


00204 




DW 




DCTl 








4A04 


2 84 A 


00205 




DW 




DCT2 








4A06 


344A 


00206 




DW 




DCT3 








4A08 


0000 


00207 




DW 











;RESV FOR HIMEM 
;DCTS 


4A0A 


0000 


00208 




DW 











;HARD DRIVES, 
; ETC , 


4A0C 


0000 


00209 




DW 











#- 


4A0E 


0000 


00210 
00211 


• 


DW 













4A10 




00212 


DCT0 


DM 




0,1,0,17 


,0 


r39,3 


,10,24H,8 








00 01 


00 11 


00 


27 03 0A 


24 


08 




4A1A 


CF4A 


00213 




DW 




DSKDVR 








4A1C 




00214 


DCTl 


DM 




1,2,0,17 


f0< 


r39,3 


,10,24H,8 








01 02 


00 11 


00 


27 03 0A 


24 


08 




4A26 


CF4A 


00215 




DW 




DSKDVR 








4A28 




00216 


DCT2 


DM 




2,4,0,17 


,0. 


r39,3 


,10,24H,8 








02 04 


00 11 


00 


27 03 0A 


24 


08 


' 


4 A3 2 


CF4A 


00217 




DW 




DSKDVR 








4 A3 4 




00218 


DCT3 


DM 




4,8,0,17 


f0. 


r39,3 


,10,24H,8 








04 08 


00 11 


00 


27 03 0A 


24 


08 




4A3E 


CF4A 


00219 
00220 




DW 




DSKDVR 












00221 




DISK 


: I/O ENTRY 












00222 
















4A40 


3E01 


00223 


SEEK 


LD 




A,l 






; SEEK 


4A42 


1825 


00224 




JR 




DSKHAN 








4A44 


3E02 


00225 


SELECT 


LD 




A,2 






; SELECT 


4A46 


1821 


00226 




JR 




DSKHAN 








4A48 


3E03 


00227 


VALID 


LD 




A, 3 






; VALIDATE 


4A4A 


181D 


00228 




JR 




DSKHAN 








4A4C 


3E04 


00229 


RSEC 


LD 




A, 4 






;READ SEC 


4A4E 


1819 


00230 




JR 




DSKHAN 








4A50 


3E05 


00231 


RADR 


LD 




A,5 






;READ ADR 


4A52 


1815 


00232 




JR 




DSKHAN 








4A54 


3E06 


00233 


RCYL 


LD 




A, 6 






;READ CYL 


4A56 


1811 


00234 




JR 




DSKHAN 








4A58 


3E07 


00235 


WSEC 


LD 




A,7 


IT 


,, t 


; WRITE SEC 


4A5A 


180D 


00236 




JR 




DSKHAN 








4A5C 


3E08 


00237 


WSECP 


LD 




A, 8 






;WRITE SEC PROT 


4A5E 


1809 


00238 




JR 




DSKHAN 








4A60 


3E09 


00239 


FORMAT 


LD 




A, 9 






; FORMAT 


4A62 


1805 


00240 




JR 




DSKHAN 








4A64 


3E0A 


00241 


INITD 


LD 




A,10 






;INIT DRV 


4A66 


C31F49 


00242 




JP 




DSKINT 
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4921 

4921 

4922 

4923 

4924 

4927 

4928 

492A 

492C 

492F 

4930 

4931 

4933 

4935 

4937 

4938 

4939 

4 93 A 

493C 

493E 

4940 

4941 

4942 

4943 

4945 

4947 

4949 

494C 

494D 

4950 

4951 

4953 

4955 

4956 

4957 

4958 

4959 

495A 

495D 

495E 



C5 

D5 

E5 

214648 

35 

201P 

3619 

210147 

34 

7E 

FE3C 

2014 

3600 

23 

34 

7E 

PE3C 

200B 

3600 

23 

34 

7E 

FE18 

2002 

3600 

210047 

34 

210D47 

7D 

FE21 

280E 

5E 

2C 

56 

2C 

E5 

216049 

E5 

D5 



495F C9 

4960 El 

4961 18ED 

4963 El 

4964 Dl 

4965 CI 

4966 3AEC37 
4969 3AE037 
496C Fl 
496D FB 
496E C9 



00143 DSKINT JR 

00144 ; 

00145 INTDO EQU 

00146 PUSH 

00147 PUSH 

00148 PUSH 

00149 LD ' 

00150 DEC 

00151 JR 

00152 LD 

00153 LD 

00154 INC 

00155 LD 

00156 CP 

00157 JR 

00158 LD 

00159 INC 

00160 INC 

00161 LD 

00162 CP 

00163 JR 

00164 LD 

00165 INC 

00166 INC 

00167 LD 

00168 CP 

00169 JR 

00170 LD 

00171 INT04 LD 

00172 INC 

00173 LD 

00174 INT05 LD 

00175 CP 

00176 JR 

00177 LD 
0017 8 INC 

00179 LD 

00180 INC 

00181 PUSH 

00182 LD 

00183 PUSH 

00184 PUSH 

00185 RET 

00186 INT07 POP 

00187 JR 

00188 INT06 POP 

00189 POP 

00190 POP 

00191 INTDUN LD 

00192 LD 

00193 POP 

00194 EI 

00195 RETINT RET 



INTDUN 

$ 

EC 
DE 
HL 

HL,CLK25 
(HL) 

NZ , INT04 

(HL) ,25 

HL,SECS 

(HL) 

A, (HL) 

60 

NZrINT04 

(HL),0 

HL 

(HL) 
A, (HL) 

60 
NZ,INT04 

(HL),0 
HL 

(HL) 
A, (HL) 
24 
NZ,INT04 

(HL),0 
HL, TICKS 

(HL) 

HL,INTQUE 

A,L 

INTENDS 25 5 

Z,INT06 

E, (HL) 

L 

D,(HL) 

L 

HL 

HL,INT07 

HL 

DE 



HL 

INT05 

HL 

DE 

EC 

A, (37ECH) 

A, (INTRST) 

AF 



;DUN, RET 



;SAVE REGS 



;GET 40MS COUNT 
;BUMP SEC? 

;N 

;RESTOR REF 
;GET SECS 
;EMP SECS 
;GET VAL 
;BMP MINS? 

;N 

SCLk SECS 

;HL->MINS 

;BNP MINS 

;GET MINS 

;BMP HOURS? 

;N 

; RESET MINS 

;HL->HOURS 

;BMP HOURS 

;GET HOURS 

; RESET HOURS? 

;N 

;NEW DAY 

; TICKS COUNTER 

;BMP MOD 256 

;INT QUEUES 

;GET L 

;QUEUES DONE? 

;Y 

;GET ADR OF 

;QUE 

;MSB 

;SAV NEXT QUE PTR 

;RET ADR 

; PUSH 

;PUSH QUE ADR FOR 

;JMP 

;JMP TO QUE 
;GET NEXT QUE PTR 
; CONT 
;RES!ro REGS 



;CLR FDC 
; RESET CLK 

/•ENABLE INT 
;RET 
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00097 


• 








4800 




00098 


INPBUF 


DS 


64 


;DOSINP BUFF 


4840 


03 


00099 


DRIVES 


DB 


3 


;# DRIVES IN 
; SYSTEM 


4841 


0A 


00100 


RETRY 


DB 


10 


;# I/O RETRIES 


4842 


00 


00101 


RTCNT 


NOP , 




; RE- TRY COUNTER 


4843 


0000 


00102 


DSKRET 


DW 





;DSK DVR ERR RET 
;ADR 


4845 


00 


00103 


bSKRS 


NOP 




;I/0 IN PROGRESS 
; FLAG 


4846 


19 


00104 


CLK25 


DB 


25 


;INT CLK SECONDS 
;REF 


4847 


0000 


00105 


Wl 


DW 





;WORK REGS, TEMP 


4849 


0000 


00106 


W2 


DW 







484B 


0000 


00107 


W3 


DW 







484D 


0000 


00108 


W4 


DW 







484F 


0000 


00109 


lOBUF 


DW 





;l/0 BUFF PTR 


4851 


0000 


00110 


TKSEC 


DW 





;CYL & SEC 


4853 


00 


00111 


SPEED 


NOP 




; SPEED MOD MULT 


4854 


03 


00112 


HIDRV 


DB 


3 


; HIGHEST DRIVE # 


4855 


0000 


00113 


LINEAR 


DW 





;PTR TO RUN 
; PARAMS 


4857 




00114 


FCB 


DM 


0,0,0,0,0,0,0,0,1 


9,0,0,0 








00 00 00 00 00 


00 00 00 00 00 00 


00 


4863 


0000 


00115 


LINPTR 


DW 





rPARAM PTR FOR 
;EXEC 


4865 


00 


00116 
00117 


STATl 


NOP 




f SYSSTAT 


;BIT0= CHECK 
























?AUTO IF 






00118 


• 












00119 


• 


INTERRUPT ROUTINE 








00120 


• 

i 








4900 




00121 
00122 


• 


ORG 


4900H 




4900 




00123 


INTER 


EQU 


$ 




4900 


F5 


00124 




PUSH 


AF ; 


SAVE AF 


4901 


3AE037 


00125 




LD 


A, ( INTRST) ; 


GET INT LATCH 


4904 


17 


00126 




RLA 




VALID INT? 


4905 


3018 


00127 




JR 


NCDSKINT i 


N 


4907 


17 


00128 




RLA 




DISK INT? 


4908 


3815 


00129 
00130 


• 


JR 


C,DSKINT ; 


Y 


490A 


3A4548 


00131 




LD 


A, (DSKRS) ; 


I/O IN PROG? 


490D 


B7 


00132 




OR 


A ; 


? 


490E 


2811 


00133 




JR 


Z , INTDO ; 


N 


4910 


CB7E 


00134 




BIT 


7,(HL) 


DRIVE TIME OUT? 


4912 


2004 


00135 




JR 


NZ,INT01 


Y 


4914 


CB46 


00136 




BIT 


0,(HL) 


I/O DUN? 


4916 


2009 


00137 




JR 


NZ , INTDO ; 


N 


4918 


Fl 


00138 


INT01 


POP 


AF 


RESTO AF 


4919 


E3 


00139 




EX 


(SP) ,HL 


GET RET ADR 


491A 


2A4348 


00140 




LD 


HL, (DSKRET) 


GET ERROR RET 


491D 


E3 


00141 




EX 


(SP) ,HL 


PUSH 


491E 


F5 


00142 




PUSH 


AF 


SAVE AF 
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4A69 

4A69 CDA04A 
4A6C F5 
4A6D CD7A4A 
4A70 Fl 
4A71 E5 
4A72 FD6E0A 
4A75 FD660B 
4A7 8 E3 



4A79 C9 



4A7A 
4A7A E5 
4A7B CB01 
4A7D 69 
4A7E 26 4 A 

4A80 7E 

4A81 23 
4A82 66 
4A83 6F 
4A84 E5 
4A85 FDEl 
4A87 El 
4A88 C9 



4A89 

4A89 E3 

4A8A 229E4A 
4A8D El 
4A8E lA 

4A8F 07 
4A90 3805 
4A92 3 Ell 
4A94 B7 
4A95 1806 
4A97 D5 
4A98 DDEl 
4A9A COA04A 

4A9D C30000 

4AA0 



00243 ; 

00244 DSKHAN 
00245 

00246 
00247 
00248 
00249 
00250 
00251 
00252 



00253 

00254 

00255 

00256 

00257 GETDCT 

00258 

00259 

00260 

00261 

00262 

00263 
00264 
00265 
00266 
00267 
00268 
00269 
00270 
00271 
00272 
00273 PREP 

00274 

00275 
00276 
00277 

0027 8 

00279 

00280 

00281 

00282 

00283 EX2 

00284 

00285 

00286 JRET 

tJ0287 SAVREG 



EQU 

CALL 

PUSH 

CALL 

POP 

PUSH 

LD 

LD 

EX 



RET 



$ 

SAVREG 

AF 

GETDCT 

AF 

HL 

L,(iy+10) 

H,(IY+11) 

(SP) ,HL 



GET DRIVE DCT IN lY 



EQU 

PUSH 

RLC 

LD 

LD 

LD 

INC 

LD 

LD 

PUSH 

POP 

POP 

RET 



$ 

HL 

C 

L,C 

H,DCTM 

A, (HL) 

HL 

H,(HL) 

L,A 

HL 

lY 

HL 



SAVE REGS ON STACK 

EQU $ 

EX (SP),HL 

LD (JRET+1) ,HL 

POP HL 

LD A, (DE) 

RLCA 

JR C,EX2 

LD A,17 

OR A 

JR JRET 

PUSH DE 

POP IX 

CALL SAVREG 

JP 

EQU $ 



;SAVE REGS ON STK 

;SAVE ENTRY CODE 

;GET DRIVE DCT 

; ENTRY CODE 

;SAVE HL (BUFF) 

;GET DRIVER ADR 

;MSB 

;SAVE DVR ADR, 

;GET 

;HL 

;JMP TO DVR 



;SAVE HL 

; DOUBLE C 

;XFR TO L 

;HL->DCT PTR FOR 

;DRV 

;GET LSB OF DCT 

;ADR 

;BMP PTR 

}GBT MSB OF DCT 

;HL->DCT 

;t>ASS TO lY 



;RESTO HL 



;SAVE REGS, CHK 

;FCB 

;SAVE HL, GET RET 

;ADR 

;STOR RET 

;RESTOR HL 

;GET FCB CTRL 

;BYTE 

;FCB OPEN? 

;YES, OK 

;NOT OPEN ERR 

;SET NZ 

;RET 

;MAKE IX=FCB 

;PUSH REGS ON 

; STACK 

;RET TO CALLING 

;RTN 
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4AA0 


224748 


00288 


LD 


(Wl) ,HL 


;SAVE HL 


4AA3 


E3 


00289 


EX 


(SP),HL 


;PUSH HL, GET RET 


4AA4 


22BD4A 


00290 


LD 


(SRVEC+l) ,HL 


;STO RET ADR 


4AA7 


D5 


00291 


PUSH 


DE 


;SAVE ALL REGS 


4AA8 


C5 


00292 


PUSH 


BC 




4AA9 


FDE5 


00293 


PUSH 


lY 




4AAB 


DDES 


00294 


PUSH ' 


IX 




4AAD 


D9 


00295 


EXX 




; PRIMES 


4AAE 


E5 


00296 


PUSH 


HL 




4AAF 


D5 


00297 


PUSH 


DE 




4AB0 


C5 


00298 


PUSH 


BC 




4AB1 


D9 


00299 


EXX 




; RE- SWITCH 


4AB2 


08 


00300 


EX 


AF,AF' 


;SWI 


4AB3 


F5 


00301 


PUSH 


AF 


;SAVE AF 


4AB4 


08 


00302 


EX 


AF,AF' 




4AB5 


21BF4A 


00303 


LD 


HL, REGRES 


;RESTO RET ADR 


4AB8 


E5 


00304 


PUSH 


HL 


;PUSH FOR RET 


4AB9 


2A4748 


00305 


LD 


HL, (Wl) 


;RESTO HL 


4ABC 


C30000 


00306 SRVEC 

00307 ; 


JP 





;RET TO CALLER 


4ABF 


- - 


00308 REGRES 


EQU 


$ 


;RESTOR PUSHED 
;REGS 


4ABF 


08 


00309 


EX 


AF,AF' 


;GET PRIM 


4AC0 


Fl 


00310 


POP 


AF 


;REST 


4AC1 


08 


00311 


EX 


AF,AF' 




4AC2 


D9 


00312 


EXX 




; PRIMES 


4AC3 


CI 


00313 


POP 


BC 




4AC4 


Dl 


00314 


POP 


DE 




4AC5 


El 


00315 


POP 


HL 




4AC6 


D9 


00316 


EXX 






4AC7 


DDEl 


00317 


POP 


IX 




4AC9 


FDEl 


00318 


POP 


lY 




4ACB 


CI 


00319 


POP 


BC 




4ACC 


Dl 


00320 


POP 


DE 




4ACD 


Rl 


00321 


POP 


HL 




4ACE 


C9 


00322 
00323 ; 


RET 




;RET TO ORG 
; CALLER 






00324 ; 


SINGLE 


DENSITY DISK DRIVER 






00325 ; 








4ACF 




00326 DSKDVR 


EQU 


$ 




4ACF 


224F48 


00327 


LD 


(IOBUF),HL 


;STO 10 BUF 


4AD2 


ED535148 


00328 


LD 


(TKSEC) ,DE 


;STO TK & SEC 


4AD6 


21EC37 


00329 


LD 


HL,CMD 


;HL->FDC CMD/STAT 


4A09 


3D 


00330 


DEC 


A 


; SEEK? 


4ADA 


2843 


00331 


JR 


Z,SEEK1 


;y 


4ADC 


3D 


00332 


DEC 


A 


; SELECT? 


4ADD 


2862 


00333 


JR 


Z,SEL1 




4ADF 


3D 


00334 


DEC 


A 


; VALIDATE 


. 4AE0 


CAF94A 


00335 


JP 


Z,VALID1 




4AE3 


3D 


00336 


DEC 


A 


;READ SEC? 


4AE4 


CA864B 


00337 


JP 


Z,R£AD1 


;Y 


4AE7 


3D 


00338 


DEC 


A 


;READ ADR 


4AE8 


C8 


00339 


RET 


Z 
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4AE9 3D 
4AEA C8 
4AEB 3D 
4AEC CA8D4B 
4AEF 3D 
4AF0 CA944B 
4AP3 3D 
4AF4 C8 
4AF5 3D 
4AF6 286B 
4AF8 C9 



4AF9 

4AP9 36D0 
4AFB CD414B 
4AFE 010020 
4B01 CD124B 
4B04 20FB 



4B06 

4B09 

4B0B 

4B0E 

4B10 

4B11 

4B12 

4B13 

4B14 

4B16 

4B17 



CD124B 

28FB 

CD124B 

20FB 

AF 

C9 

78 

Bl 

2804 

0B 

CB4E 



4B19 C9 
4B1A Fl 
4B1B 3E15 
4B1D B7 
4BiE C9 



4B1F 

4B1F 

4B20 

4B23 

4B24 

4B27 

4B2B 

4B2C 

4B2F 

4B30 

4B32 

4B35 

4B36 

4B39 

4B3C 



D5 

CD634B 

Dl 

CD414B 

ED53EE37 

7A 

FDBE04 

C8 

3E10 

FDB606 

77 

CD5E4B 

CD414B 

CB46 



00340 

00341 

00342 

00343 

00344 

00345 

00346 

00347 

00348 

00349 

00350 

00351 

00352 

00353 

00354 VALIDl 

00355 

00356 

00357 

00358 VDl 

00359 

00360 VD2 

00361 

00362 VD3 

00363 

00364 

00365 

00366 VDT 

00367 

00368 

00369 

00370 

00371 

00372 VTDE 
00373 
00374 
00375 

00376 ; 

00377 SEEKl 
00378 
00379 
00380 
00381 
00382 
00383 
00384 
00385 
00386 
00387 
00388 

00389 WAIT 

00390 W00 
00391 



DEC 

RET 

DEC 

JP 

DEC 

JP 

DEC 

RET 

DEC 

JR 

RET 



A 
Z 
A 

Z,WRITE1 
A 

Z , PROTl 

A 

Z 

A 

Z,INIT1 



VALIDATE DRIVE 



EQU 
XD 
CALL 
LD 

CALL 
JR 

CALL 

JR 

CALL 

JR 

XOR 

RET 

LD 

OR 

JR 

DEC 

BIT 

RET 

POP 

LD 

OR 

RET 

EQU 

PUSH 

CALL 

POP 

CALL 

LD 

LD 

CP 

RET 

LD 

OR 

LD 

CALL 

CALL 

BIT 



(HL),0D0H 
SELl 

BC,2000H 

VDT 

NZ,VD1 

VDT 

Z,VD2 

VDT 

NZ,VD3 

A 

A,B 

C 

Z,VTDE 

BC 

If(HL) 



AF 
A, 21 
A 



$ 

DE 

INITl 
DE 
SELl 

(SEC) ,DE 
A,D 

(iy+4) 

Z 

A,10H 

(IY+6) 

(HL) ,A 

DELAY 

SELl 

0f(HL) 



;READ TRK 
/•WRITE SEC? 
/•WRITE PROT 
/•FORMAT? 
/•INIT DRV? 

;Y 



;FCD=MODE 1 

/•SELECT DRV 

/•TEST LENGTH 

; TEST 

/•LOOP IF INDEX 

/•HOLE 

;TEST 

/•LOOP IN NOT INX 

; TEST 

/•LOOP IF INX HOLE 

/•NO ERR 

/•GET COUNT 

; ERROR? 

;YES 

/•DEC COUNT 

/•RET WITH INDEX 

; STAT 

/•KILL INT CALL 

/•ERR 

/•SET FLAGS 



/•SAVE TRK & SEC 

;INIT DRV 

/•GET TRK & SEC 

/•SELECT 

;STO TRK & SEC 

/•GET TRK 

/•ALREADY HERE? 

;Y 

/•SEEK W/VERF 
/•ADD STEP BITS 
/•ISSUE CMD 
/•DELAY FOR FDC 
;SEL DRIVE 
/•DONE? 
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4B3E 20F9 


00392 




JR 


NZ,W00 


;N0 


4B40 C9 


00393 




RET 




f bl^n^ 


4341 7E 


00394 


SELl 


LD 


A, (HL) 


;GET STAT 


4B42 F5 


00395 




PUSH 


AF 


;SAVE STAT 


4B43 FD7E01 


00396 




LD 


A,(IY+1) 


;GET DRV SRLCOD 


4B46 32E037 


00397 




LD 


(SEL) ,A 


; SELECT 


4B49 Fl 


00398 




POP 


AF 


;GET PREV STAT 


4B4A 07 


00399 




RLCA 




;WERE DRVS ON? 


4B4B D0 


00400 




RET 


NC 


;Y 


4B4C C5 


00401 




PUSH 


BC 


;SAVE BC 


4B4D 01608C 


00402 




LD 


BC,8C60H 


; DELAY COUNT 


4B50 PDCB026E 


i 00403 




BIT 


5,(iy+2) 


. ;FULL SEC? 


4B54 2002 


00404 




JR 


NZ,S01 


;Y 


4B56 0646 


00405 




LD 


B,46H 


;l/2 SEC DELAY 


4B58 CD6000 


00406 


S01 


CALL 


60H 


;ROM DELAY RTN 


4B5B CI 


00407 




POP 


BC 


;RES BC 


4B5C 18E3 


00408 
00409 


• 


JR 


SELl 


; RES EL & RET 


4B5E E3 


00410 


DELAY 


EX 


(SP) ,HL 


; WASTE TIME FOR 
;FDC 


4B5F E3 


00411 




EX 


(SP),HL 




4B60 E3 


00412 




EX 


(SP) ,HL 




4B61 E3 


00413 




EX 


(SP) ,HL 




4B62 C9 


00414 
00415 


• 


RET 






4B63 FDCB0246 


00416 


INITl 


BIT 


0,(iy+2) 


;DRV INIT? 


4B67 C0 


00417 




RET 


NZ 


;Y ' 


4B68 FDCB02C6 


00418 




SET 


0,(IY+2) 


;MAKE INIT 


4B6C FD360400 


00419 




LD 


(IY+4),0 


; RESET TRK # 


4B70 0660 


00420 




LD 


B,96 


;MAX TRK CNT 


4B72 CD414B 


00421 


100 


CALL 


SELl 


; SELECT DRIV 


4B75 36D0 


00422 




LD 


(HL) ,0D0H 


•TYPE 1 MODE 


4B77 CB56 


00423 




BIT 


2,(HL) 


;CYL 0? 


4B79 C0 


00424 




RET 


NZ 


;DONE 


4B7A 3E60 


00425 




LD 


A,60H 


;STEP OUT CMD 


4B7C FOB606 


00426 




OR 


(IY+6) 


;ADD STEP RATE 


4B7F 77 


00427 




LD 


(HL) ,A 


;STEP OUT 


4B80 CD364B 


00428 




CALL 


WAIT 


;WAIT TIL DONE 


4B83 10Rn 


00429 




DJNZ 


100 


; CONT 


4B85 C9 


00430 
00431 


; 


RET 






4B86 CD9B4B 


00432 


READl 


CALL 


TASK 


;D0 FUNC 


4B89 88031A02 


00433 




DB 


88H,3,1AH,2 


;CMD, STA ERRCOD 


4 BSD CD9B4B 


00434 


WRITEl 


CALL 


TASK 




4B90 A80B1200 


00435 




DB 


0A8H,11,18,0 




4B94 CD9B4B 


00436 


PROTl 


CALL 


TASK 




4B97 A90B1200 


00437 
00438 


; 


DB 


0A9H,11,18,0 




4B9B E3 
PARS 


00439 


TASK 


EX 


(SP),HL 


;SAVE CMDREG, GE' 


4B9C 7E 


00440 




LD 


A,(HL) 


;GET FDC CMDS 


4B9D 32CF4B 


00441 




LD 


(ISSUE+1),A 


; STO 


4BA0 23 


00442 




INC 


HL 


;BMP PTR 


4BA1 7E 


00443 




T.D 


A,(HL) 


;GET STA ERRCOD 


4BA2 32094C 


00444 




LD 


(ERROR+1) ,A 


;STO 
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4BA5 23 
4BA6 7E 
4BA7 23 
4BA8 66 
4BA9 6F 
4BAA 22D64B 
4 BAD El 
4BAE 3A4148 

4BB1 324248 
4BB4 CDBA4B 
4BB7 7B 
4 BBS B7 
4BB9 C9 



4BBA 

4BBD 

4BC1 

4BC4 

4BC6 

4BCA 

4 BCD 

4BCE 

4BD0 

4BD3 

4BD4 

4BD6 

4BD7 

4BD8 

4BD9 

4BDA 

4BDC 

4BDE 

4BE0 

4BE2 

4BE4 

4BE6 

4BE8 

4BEA 

4BEA 



21EC37 

ED5B514 

CD1P4B 

36D0 

ED4B4F4 

11EF37 

F3 

3600 

CD5E4B 

0A 

1804 

00 

00 

03 

0A 

CB4E 

20F8 

CB46 

2808 

CB4E 

20F0 

CB7E 

28F0 

7E 



REDO 



4BEB 47 
4BEC 07 
4BED 1E15 
4BEF D8 
4BF0 07 
4BF1 3815 
4BF3 07 

4BF4 3812 
4BF6 78 
4BF7 1E00 
4BF9 E61C 
4BFB C8 



00445 
00446 
00447 
00448 
00449 
00450 
00451 
00452 

00453 

00454 

00455 

00456 

00457 

00458 

00459 

8 00460 

00461 

00462 

8 00463 

00464 

00465 

00466 

00467 

00468 

00469 

00470 

00471 

00472 

00473 

00474 

00475 

00476 

00477 

00478 

00479 

00480 

00481 

00482 lODUN 
00483 
00484 ; 
00485 
00486 
00487 
00488 
00489 
00490 
00491 

00492 
00493 
00494 
00495 
00496 



ISSUE 

LOOP 

XFER 

DIO 



INC 

LD 

INC 

LD 

LD 

LD 

PCJP 

LD 

LD 

CALL 

LD 

OR 

RET 

LD 

LD 

CALL 

LD 

LD 

LD 

DI 

LD 

CALL 

LD 

JR 

NOP 

NOP 

INC 

LD 

BIT 

JR 

BIT 

JR 

BIT 

JR 

BIT 

JR 

EQU 

LD 

EI 

LD 

RLCA 

LD 

RET 

RLCA 

JR 

RLCA 

JR 

LD 

LD 

AND 

RET 



HL 

A, (HL) 

HL 

H, (HL) 

L,A 

(XFER) ,HL 

HL 

A, (RETRY) 

(RTCNT) ,A 

REDO 

A,E 

A 



HL,CMD 
DE, (TKSEC) 
SEEKl 
(HL) ,0D0H 
BC,(IOBUF) 
DE,DATA 



(HL),0 
DELAY 
A, (BC) 
DIO 



BC 

A, (BC) 

1,(HL) 

NZ,XFER 

0f (HL) 

Z , lODUN 

If(HL) 

NZ,XFER 

7,(HL) 

Z,DIO 

$ 

A, (HL) 

B,A 

E,21 
C 

C, ERROR 



C, ERROR 

A,B 

E,0 

ICH 

Z 



;BMP PTR 
;GET XFER OPS 

;MSB XFR OPS 
;HL=XFER OPS 
;STO XFER OPS 
;HL=37ECH, CMD 
;GET # I/O 
/•RETRIES 
;STO IN CNT 
;D0 I/O 
;GET ERRCOD 
;SET FLAG 



;RE-INIT CMD REG 
;GET TK & SEC 
;SEEK IF NOT? 
/•RESET FDC ' 
/•GET I/O BUFF 
;DATA REG 
/•KILL INT 
; ISSUE CMD 
/•DELAY FOR FDC 
/•GET BUF CHR 
/• CONT 
./•XFER OPS HERE 

;BMP BUFF 

;GET NEXT BUF CHB 

; DRQ? 

/• DUN? 
;DRQ? 

;TIME OUT? 

;N 

;GET FDC STAT 
/•ENABLE INT 
/•SAVE ERR COD 
;TIME OUT? 
/•TIME OUT ERRCOD 

;Y 

;WR PROT/SEC TYP? 

;WR FAULT/SEC 
; TYP? 

/•GET FDC STAT 
/•INIT NO ERR 
/• ERR? 

;N' 
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4BFC 214248 


00497 


LD 


HL,RTCNT 


4BFF 35 


00498 


DEC 


(HL) 


4C00 2806 


00499 


JR 


Z , ERROR 


4C02 FDCB0286 


00500 


RES 


0,(IY+2) 


4C06 18B2 


00501 


JR 


REDO 




00502 ; 


f 




4C08 1E00 


00503 ERROR 


LD 


E,0 


4C0A 0F 


00504 


RRCA 




4C0B 0F 


00505 


RRCA 




4C0C 0F 


00506 


RRCA 




4C0D D8 


00507 


RET 


C 


4C0E IC 


00508 


INC 


E 


4C0F 0F 


00509 


RRCA 




4C10 D8 


00510 


RET 


C 


4C11 IC 


00511 


INC 


E 


4C12 0F 


00512 


RRCA 




4C13 D8 


00513 


RET 


C 


4C14 IC 


00514 


INC 


E 


4C15 0F 


00515 


RRCA 




4C16 D8 


00516 


RET 


C 


4C17 IC 


00517 


INC 


£ 


4C18 C9 


00518 
00519 ; 


RET 






00520 ; 


FCB HANDLERS 




00521 ; 






4C19 


00522 OPEN 


EQU 


$ 


4C19 CDA04A 


00523 


CALL 


SAVREG 


4C1C D5 


00524 


PUSH 


DE 


4C1D DDEl 


00525 


POP 


IX 


4C1F 4F 


00526 


LD 


C,A 


4C20 3A5448 


00527 


LD 


A, (HIDRV) 


4C23 B9 


00528 


CP 


C 


4C24 382A 


00529 


JR 


C,EX1 


4C26 DD360080 


00530 


LD 


(IX),80H 


4C2A DD360100 


00531 


LD 


(IX+1),0 


4C2E DD7502 


00532 


LD 


{IX+2),L 


4C31 DD7403 


00533 


LD 


(IX+3) rH 


4C34 DD360400 


00534 


LD 


(IX+4),0 


4C38 DD360500 


00535 


LD 


(IX+5),0 


4C3C DD7106 


00536 


LD 


(IX+6) ,C 


4C3F DD360700 


00537 


LD 


(IX+7) ,0 


4C43 DD360800 


00538 


LD 


(IX+8),0 


4C47 DD360900 


00539 


LD 


{IX+9),0 


4C4B DD700A 


00540 


T.D 


(IX+10) ,B 


REC 








4C4E AF 


00541 


XOR 


A 


4C4F C9 


00542 


RET 




4C50 3E10 


00543 EXl 


LD 


A,16 



; RETRY CNT 
; RETRY? 
;N0, ERR 
; FORCE INIT 
;REDO 

;ERRCOD START 



;LOST DATA 



; PARITY ERROR 



; RECORD NOT FOUND 



;WR FAULT/SEC 
;TYP=6 
;MUST BE 
;WR PROT/SEC 
;TYP=7 



OPEN FCB 

SAVE REGS 

GET FCB IN IX 

IX->FCB 

XFER DRIV # 

GET HIGH DRV # 

BAD DRIVE? 

YES 

INIT CTRL BYTE 

CLR STATUS BYTE 

STOR LSB OF I/O 

BUFF 

STOR MSB OF BUFF 

STARTING SEC, 

TRK=0,0 

(SEE @DEFIN 

CALL) 

STOR DRIVE 

CLR 'NEXT REC 

FIELD 



; STORE LOGICAL 

;LEN 

;N0 ERROR 

;RET 

;BAD DRIVE ERR 
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4C52 B7 
4C53 C9 



4C54 

4C54 CD894A 

4C57 CD604C 



4C5A C0 
4C5B DD36 

4C5P C9 



00544 

00545 

00546 

00547 

00548 

00549 CLOSE 

00550 

00551 

00552 
00553 



00554 

00555 ; 

00556 ; 

00557 ; 
4C60 00558 FLUSH 
4C60 DDCB014E 00559 

4C64 C8 00560 
4C65 DDCB018E 00561 
4C69 C33C4D 00562 

00563 ; 

00564 ; 

00565 ; 
4C6C 00566 DEFIN 
4C6C C5 00567 

4C6D 010000 00568 

4C70 CD2746 00569 



4C73 CI 
4C74 C0 
4C75 CD894A 



4C78 

4C7B 

4C7E 

4C81 

4C82 

4C84 

4C87 

4C8A 

4C8C 

4C80 

4C8F 

4C92 

4C93 

4C94 

4C96 



DD4E06 

CD7A4A 

FD7E05 

BC 

3813 

DD7405 

FD7E07 

E67F 

BD 

3805 

DD7504 

AF 

C§ 

3E13 

01 



4C97 3E12 
4C99 B7 
4C9A C9 



0.0570 
00571 
00572 

00573 

00574 

00575 

00576 

00577 

00578 

00579 

00580 

00581 

00582 

00583 

00584 

00585 

00586 EX4 

00587 

00588 EX3 

00589 

00590 

00591 ; 

00592 ; 



OR A 
RET 

CLOSE AN FCB 



;SET NZ 



EQU 

Ci!?LL 

CALL 

RET 
LD 



$ 

PREP 

FLUSH 

NZ 
(IX), 



RET 

WRITE UN-WRITTEN DATA 



EQU 
BIT 

RET 
RES 
JP 



If (IX+l) 



1,(IX+1) 
SWRITE 



; CHECK IF FCB OK 
/•WRITE UN-WRITTE] 
/•DATA (IF ANY) 
;RET IF ERR 
;FCB CTRL 
;BYTE= OFF 
;RET 



;ANY DATA TO 
/•WRITE? ^ 
;N0, RET 
/•RESET FLAG 
/•WRITE REL SEC 



DEFINE STARTING SECTOR IN FCB 



EQU 

PUSH 

LD 

CALL 

POP 
RET 
CALL 

LD 

CALL 

LD 

CP 

JR 

LD 

LD 

AND 

CP 

JR 

LD 

XOR 

RET 

LD 

DEFB 

LD 
OR 

RET 



$ 

BC 

BC,0 

@POSN 

BC 

NZ 
PREP 

C,(IX+6) 

GETDCT 

A, (IY+5) 

H 

C,EX3 

(IX+5) ,H 

A, (IY+7) 

127 

L 

C,EX4 

(IX+4),L 

A 

A, 19 
1 

A,18 
A 



POSN FCB TO RECORD 



./•SAVE BC 
;POSN FCB TO 
;REC 

/•ALSO FLUSHES 
; BUFF 
;RESTO BC 
/• ERROR 
/•SAVE REGS, 
; IX=FCB 
/•GET DI^IV 
;GET DCT OF DRV 
/•GET # TRKS 
;TRK SPEC OK? 
/•NO, ERR 
;STO TRK IN FCB 
/•GET SECS/TRK 
/•MASK VALUE 
/•SEC SPEC OK? 
;N0, ERR 
;STOR IN FCB 
/•NO ERR 

/•BAD SEC ERR 
/•SAVE A 
; (LD BC,NN) 
/•BAD TRK ERR 
/•SET NZ 
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4C9B 

4C9B CD894A 

4C9E CD604C 

4CA1 DD7E0A 
4CA4 1E00 
4CA6 B7 
4CA7 2815 



4CA9 
4CAA 
4 CAD 
4CAE 
4CAF 
4CB1 
4CB2 
4CB3 
4 CBS 
4CB6 
4CB7 
4CB9 
4CBA 
4CBC 



AF 

210000 

04 

05 

2004 

0C 

0D 

g807 

83 

0B 

30F4 

23 

18F1 

E5 



4CBD CI 
4CBE DD7108 
4CC1 DD7009 
4CC4 DD7707 

4CC7 AF 
4 CCS C9 



4CC9 

4CC9 CDA04A 
4CCC DDCB007E 
4CD0 C8 
4CD1 05 
4CD2 CAF04C 



4CD5 
4CD5 C5 

4CD6 CD224D 
4CD9 CI 
4CDA C0 
4CDB 71 
4CDC DDCB01CE 
4CE0 DD3407 
4CE3 2802 



00593 ; 

00594 POSN EQU 

00595 CALL 

00596 CALL 

00597 LD 

00598 LD 

00599 OR 

00600 JR 

00601 XOR 

00602 LD 

00603 P02 INC 

00604 DEC 

00605 JR 

00606 INC 

00607 DEC 

00608 JR 

00609 P03 ADD 

00610 DEC 

00611 JR 

00612 INC 

00613 JR 

00614 P04 PUSH 

00615 POP 

00616 POl LD 

00617 LD 

00618 LD 

00619 XOR 

00620 RET 
00621 
00622 
00623 

00624 BYTEIO EQU 

00625 CALL 

00626 BIT 

00627 RET 

00628 DEC 

00629 JP 
00630 
00631 
00632 

00633 BYTEO EQU 

00634 PUSH 

00635 CALL 

00636 POP 

00637 RET 

00638 LD 

00639 SET 

00640 INC 

00641 JR 



$ 

PREP 

FLUSH 

A, (IX+10) 

A 
Z,P01 

A 

HL,0 

B 

B 

NZ , P03 

C 

C 

Z,P04 

A,E 

BC 

NC,P02 

HL 

P02 

HL 

BC 

(IX+8) ,C 
(IX+9) ,B 
(IX+7) ,A 



VERF FCB 

FLUSH BUFF IF 

NEEDED 

GET LOG REC LEN 

DE=LKL 

LRL=256? 

YES, BC=REL 

SEC # 

A=0 

HL=SEC 

MSB REC #0? 

? 

NO 

LSB REC # 0? 

POSN DONE 

ADD LRL 

DEC REC CNT 

GO IF NC 

BMP REL SEC CNT 

CONT 

PASS REL SEC TO 

BC 



;STOR LSB OF SEC 

;MSB OF SECTOR 

;STOR BYTE WITHIN 

;SEC 

;N0 ERROR 



HANDLE BYTE I/O VIA 13H, IBH ROM CALLS 



$ 

SAVREG 

7,{IX) 

Z 

B 

Z,BYTEI 



WRITE A BYTE 



$ 
BC 

SREAD 

BC 

NZ 

(HL) ,C 

1,(IX+1) 

(IX+7) 

Z,BTX 



;SAV REGS 
; FCB? 
;N0, RET 
;READ? 
;READ BYTE 



C=BYT 



MAKE BUFF=SEC 
C=BYTE 

GO IF SREAD ERR 
XFR BYT TO BUFF 
'BUFF=0/S DATA' 
BMP CUR BYTE # 
GO IF TIME TO 
WRITE 
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4CE5 AF 

4CE6 C9 

4CE7 CD604C 

4CEA C0 

4CEB CD164D 

4CEE AF 

4CEF C9 



4CF0 

4CF0 CD604C 

4CF3 CD224D 
4CF6 C0 
4CF7 CDi304D 
4CFA CD124D 

4CFD AF 
4CFE 7E 

4CFF C9 

4D00 CD0B4D 
4D03 DD7E07 
4D06 85 
4D07 6F 
4D08 D0 
4D09 24 



00642 
00643 
00644 
00645 
00646 
00647 
00648 
00649 
00650 
00651 
00652 
00653 



BTX 



BYTEI 



00654 
00655 
00656 BI0 
00657 

00658 
00659 

00660 

00661 ; 

00662 PTHL 
00663 
00664 
00665 
00666 
00667 



4D0A C9 
4D0B DD6E02 
4D0E DD6603 
4D11 C9 

4D12 DD3407 

4D15 C0 

4D16 DDCB0186 00676 INCSEC 



00668 
00669 
00670 PTH 
00671 
00672 

00673 ; 

00674 INCBYT 
00675 



XOR 

RET 

CALL 

RET 

CALL 

XOR 

REO? 



FLUSH 
NZ 

INCSEC 
A 



READ A BYTE 



EQU 
CALL 

CALL 
RET 
CALL 
CALL 

XOR 

LD 

RET 

CALL 

LD 

ADD 

LD 

RET 

INC 



4D1A DD3408 
4 DID C0 

4D1E DD3409 

4D21 C9 



4D22 



00677 
00678 

00679 

00680 
00681 
00682 
00683 
006 84 
00685 SREAD 



RET 
LD 
LD 
RET 

INC 
RET 
RES 

INC 
RET 

INC 

RET 



$ 
FLUSH 

SREAD 
NZ 

PTHL 
INCBYT 

A 

A, (HL) 



PTH 

A, (IX+7) 

A,L 

L,A 

NC 

H 



L,{IX+2) 
H,(IX+3) 



(IX+7) 

NZ 

0,(IX+1) 

(IX+8) 

NZ 



(IX+9) 



;N0 ERR 

; WRITE BUFF 
; ERROR 
;BMP SEC # 
;N0 ERR 



; FLUSH BUFF IF 

; NEEDED 

;READ NEXT SEC 

; ERR 

;HL->NEXT BYT 

;BMP FCB 'NEXT 

;BYTE' 

;SET ZERO FLAG 

;GET BYTE 

; FINALLY! 

;RET 

;HL-> BUFFER 

;GET CUR BYTE 

;ADD CUR BYT 

;,XFER 

;ret if HL->BYTE 

;BMP MSB, 

; COMPEN- 

;SATE FOR 

/•CROSSING 

/•PAGE BOUNDRIES 

;GET LSB BUFF PTR 
;GET MSB 



;BMP NEXT BYT 

;RET IF OK 

;RES 'BUFFsSEC 

; FLAG 

;BMP NEXT SEC 

fRti-1' IF NO MSB 

;BMP 

;BMP MSB OF NEXT 

;SEC 



READ THE FOB'S 'NEXT' SECTOR 
(NOT A USER CALL) 



EQU 
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4022 ODCB0146 00686 



4D26 2802 
4D28 AF 
4D29 C9 
4D2A CD4F4D 

4D2D DD4E06 

4D30 CD0B4D 

4D33 CD0946 

4D36 C0 

4D37 DDCB01C6 00695 

4D3B C9 00696 

00697 

00698 

00699 
4D3C 00700 SWRITE 

4D3C CD4F4D 00701 



00687 
00688 
00689 
00690 SSI 

00691 
00692 
00693 
00694 



4D3F DD4E06 
4D42 CD0B4D 
4D45 DDeB0156 
4D49 CA1246 
4D4C C31546 



4D4F 

4D4F DD4E06 

4D52 CD7A4A 

4D55 DD5E04 

4D58 DD5605 

4D5B DD4E08 

4D5E DD4609 
4D61 78 
4D62 Bl 
4D63 C8 

4D64 03 

4D65 IC 
4D66 FD7E07 
4D69 E67F 
4D6B BB 

4D6C 20F3 
4D6E 1E00 
4D70 14 
4D71 18EE 



4D73 

4D73 CD894A 
4D76 DD7E0A 
4D79 B7 



00702 

00703 

00704 

00705 

00706 

00707 

00708 

00709 

00710 COMP 

00711 

00712 

00713 

00714 

00715 

00716 
00717 COl 
00718 
00719 

00720 

00721 
00722 
00723 
00724 

00725 

00726 

00727 

00728 

00729 

00730 

00731 

00732 READ 

00733 

00734 

00735 



BIT 

JR 

XOR 

RET 

CALL 

LD 

CALL 

CALL 

RET 

SET 

RET 



0,(IX+1) 

ZrSSl 

A 

COMP 

C,(IX+6) 

PTH 

SRSEC 

NZ 

0,(IX+1) 



;BUFF = SECTOR? 

;N0 

;N0 ERR 

/COMPUTE TRK & 

;SEC 

;GET DRIVE 

;HL->BUPF 

;READ SEC 

;ERR 

;SET 'BUFF=SEC' 

;RET 



WRITE THE FCB'S 'NEXT' SECTOR 



EQU 
CALL 

LD 

CALL 

BIT 

JP 

JP 



$ 
COMP 

C,(IX+6) 

PTH 

2,(IX+1) 

Z,@WSEC 

@WSECP 



; COMPUTE TRK & 

;SEC 

;GET DRIV 

;HL->BUFFER 

; WRITE SEC PROT? 

;N0 

;YES 



COMPUTE REAL TRK & SEC FROM REL SEC 



EQU 

LD 

CALL 

LD 

LD 

LD 

LD 
LD 
OR 
RET 

DEC 

INC 
LD 
AND 
CP 

JR 
LD 
INC 
JR 



C,(IX+6) 
GETDCT 
E,(IX+4) 
D, (IX+5) 
C, (IX+8) 

B, (IX+9) 

A,B 

C 

Z 

BC 

E 

A, (IY+7) 

127 

E 

NZ,C01 
E,0 
D 
COl 



;GET 


DRIV 


;GET 


DCT 




;STA 


SECTOR 


;STA 


TRK 




;GET 


RRT, 


SEC TO 


; COMP 




; DONE 


3? 




;YES, 


DE= 


=TRK & 


;SEC 






;DEC 


REC 


SEC 


; COUNT 




;BMP 


SEC 


# 


;GET 


SEC 


# 


;GET 


# SEC/TRK 


; TIME 


TO 


BUMP TRK 


;#? 






?N0 






? RESET SECTOR CNT 


?BMP 


TRK 




;CONT 







READ NEXT RECORD 



EQU 
CALL 
LD 
OR 



$ 

PREP 

A, {IX+10) 

A 



;VERF FCB 
;GET LEL 
;LRL=256? 
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4D7A 280B 


00736 




JR 


Z,XR01 


4D7C 47 


00737 




LD 


B,A 


4D7D CD1300 


00738 


XR02 


CALL 


13H 


4D80 C0 


00739 




RET 


NZ 


4D81 77 


00740 




LD 


(HL) ,A 


4D82 23 


00741 




INC 


HL 


4D83 10F8 


00742 




DJNZ 


XR02 


4D85 AF 


00743 




XOR 


A 


4D86 C9 


00744 
00745 


• 
/ 


RET 




4D87 CD604C 


00746 


XR01 


CALL 


FLUSH 


4D8A DDCB0186 


00747 




RES 


0,(IX+1) 


4D8E CD224D 


00748 




CALL 


SREAD 


4D91 C0 


00749 




RET 


NZ 


4D92 CD164D 


00750 




CALL 


INCSEC 


4D95 AF 


00751 


-• 


XOR 


A 


4D96 C9 


00752 
00753 


; 


RET 






00754 


; 


WRITE 


NEXT REC 




00755 


; 






4D97 


00756 


WRITE 


EQU 


$ 


4D97 CD894A 


00757 




CALL 


PREP 


4D9A DD7E0A 


00758 




LD 


A, (IX+10) 


4D9D B7 


00759 




OR 


A 


4D9E 280B 


00760 




JR 


Z,WRI 


4DA0 47 


00761 




LD 


B,A 


4DA1 7E 


00762 


WS00 


LD 


A, (HL) 


4DA2 CD1B00 


00763 




CALL 


IBH 


40A5 C0 


00764 




RET 


NZ 


4DA6 23 


00765 




INC 


HL 


4DA7 10F8 


00766 




DJNZ 


WS00 


4DA9 AF 


00767 




XOR 


A 


4DAA C9 


00768 
00769 


• 


RET 




4DAB 


00770 


WRI 


EQU 


$ 


4DAB CD3C4D 


00771 




CALL 


SWRITE 


4 DAE C0 


00772 




RET 


NZ 


4DAF CD164D 


00773 




CALL 


INCSEC 


4DB2 AF 


00774 




XOR 


A 


4DB3 C9 


00775 
00776 


• 
/ 


RET 






00777 


• 


DISP/PRINT LINE 




00778 


• 






4DB4 112540 


00779 


PRINT 


LD 


DE,4025H 


4DB7 1803 


007 80 




JR 


DEV 


4DB9 111D40 


00781 


LINE 


LD 


DE,401DH 


4DBC 7E 


007 82 


DEV 


LD 


A, (HL) 


4DBD FE03 


00783 




CP 


3 


4DBF C8 


007 84 




RET 


Z 


4DC0 CD1B00 


007 85 




CALL 


IBH 


4DC3 7E 


007 86 




LD 


A, (HL) 


4DC4 FE0D 


007 87 




CP 


13 


4DC6 C8 


007 88 




RET 


Z 



;y 

;GET LRL 

••READ BYTE 

; ERR 

;STOR IN USEREC 

;BMP HL 

;LOOP 

;N0 ERR 



; FLUSH BUFF 

;BUFF<>NEXT 

;READ NEXT SEC 

;ERR 

;BMP SEC 

;N0 ERR 



VERF FCB 

GET LRL 

LRL=256? 

Y 

B=LRL 

GET NEXT CHR 

WRITE BYT 

ERROR 

BMP BUFPTR 

LOOP 

NO ERR 



;WRITE BUFFER 
; ERROR 
;BMP SEC 
;N0 ERR 



;DCB ADR 
;CON 

;DCB ADR 
;GET CHR 
; EOL? 

;y 

; WRITE BYTE TO 
;DEV 

;GET BYT 
; EOL? 

;Y 
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4DC7 


23 


00789 




INC 


HL 


;BMP LINPTR 


4DC8 


18F2 


00790 
00791 ) 


•f 


JR 


DEV 


;CONT 


4DCA 




00792 eiNIT 


DM 


28,31, 'S/OS 


> disk operating 


system, ver 1 


.0 08/04/82 M0, 13 










IC IF 


53, 2F 4F 


53 20 64 69 


73 6B 20 






6F 70 


65 72 61 


74 69 6E 67 


20 73 79 






73 74 


65 6D 2C 


20 76 65 72 


20 31 2E 






30 20 


30 38 2F 


30 34 2F 38 


32 0A 0D 






00793 i 














00794 ) 




PUTS DECIMAL EQU OF (INT) VALUE. 






00795 , 




ENTRY ! 


: HL->DEST, C=0 LEADING ZEROS 






00796 < 


', 








4DFA 


0000 


00797 ] 


[NT 


DEFW 







4DFC 


111027 


00798 CIS 


LD 


DE,10000 




4DFF 


CD194E 


00799 




CALL 


CVI 




4E02 


11E803 


00800 CI4 


LD 


DE,1000 




4E05 


CD194E 


00801 




CALL 


CVI 




4E08 


116400 


00802 CI3 


LD 


DE,100 




4E0B 


CD194E 


00803 




CALL 


CVI 




4E0E 


110A00 


00804 CI2 


LD 


DE,10 




4 Ell 


CD194E 


0080S 




CALL 


CVI 




4E14 


3AFA4D 


00806 




LD 


A, ( INT) 




4E17 


1827 


00807 




JR 


L0P4 




4E19 


C5 


00808 CVI 


PUSH 


BC 




4 El A 


0600 


00809 




LD 


B,0 




4E1C 


E5 


00810 




PUSH 


HL 


, 


4E1D 


2AFA4D 


00811 




LD 


HL, (INT) 




4E20 


B7 


00812 LOP 


OR 


A 




4E21 


EDS 2 


00813 




SBC 


HL,DE 




4E23 


3807 


00814 




JR 


C,L0P3 




4E25 


F5 


00815 




PUSH 


AF 




4E26 


04 


00816 




INC 


B 




4E27 


Fl 


00817 




POP 


AF 




4E28 


2803 


00818 




JR 


Z,L0P2 




4F.2A 


18F4 


00819 




JR 


LOP 




4E2C 


19 


00820 L0P3 


ADD 


HL,DE 




4E2D 


22FA4D 


00821 L0P2 


LD 


(INT) ,HL 




4E30 


78 


00822 




LD 


A,B 




4E31 


El 


00823 




POP 


HL 




4E32 


CI 


00824 




POP 


BC 




4E33 


37 


00825 




OR 


A 




4E34 


2804 


00826 




JR 


Z,L0P4A 




4E36 


0E00 


00827 




LD 


C,0 




4E38 


1806 


00828 




JR 


L0P4 




4E3A 


79 


00829 L0P4A 


LD 


A,C 




4E3B 


87 


00830 




OR 


A 




4E3C 


2802 


00831 




JR 


Z,L0P4 




4E3E 


3EF0 


00832 




LD 


A,0F0H 




4E40 


C630 


00833 L0P4 


ADD 


A,30H 




4E42 


77 


00834 




LD 


(HL) ,A 




4E43 


23 


00835 




INC 


HL 




4E44 


C9 


00836 
00837 ; 


» 


RET 






4E45 


7E 


00838 NEXT 


LD 


A,(HL) 


;GET CHR 
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4E46 FE0D 


00839 


CP 


13 


4E48 C8 


00840 


RET 


Z 


4E49 FE2C 


00841 


CP 


1 1 


4E4B 2803 


00842 


JR 


Z,NXX 


4E4D FE20 


00843 


CP 


32 


4E4F C0 


00844 


RET 


, NZ 


4E50 23 


00845 NXX 


INC 


HL 


4E51 18F2 


00846 
00847 ; 


JR 


NEXT 




00848 ; 


LOAD 


A OBJ PROG 




00849 ; 






4E53 


00850 LOAD 


EQU 


$ 


4E53 CD5B4E 


00851 


CALL 


LODX 


4E56 C0 


00852 


RET 


NZ 


4E57 2A4B48 


00853 


LD 


HL, (W3) 


4E5A C9 


00854 
00855 ; 


RfiT 




4E5B CDA04A 


00856 LODX 


CALL 


SAVREG 


4E5E CD0646 


00857 


CALL 


@ VALID 


4E61 C0 


00858 


RET 


NZ 


4E62 CD7A4A 


00859 


CALL 


GETDCT 


4E65 210045 


00860 


LD 


HL,BOFP 


4E68 D9 


00861 


EXX 




4E69 CDBB4E 


00862 LMAN 


CALL 


GB 


4E6C B7 


00863 


OR 


A 


4E6D 2841 


00864 


JR 


Z,LCOM 


4E6F FE01 


00865 


CP 


1 


4E71 2021 


00866 


JR 


NZ , LXFR 


4E73 CDBB4E 


00867 


CALL 


GB 


4E76 D602 


00868 


SUB 


2 


4E78 47 


00869 


LD 


B,A 


4E79 CDBB4E 


00870 


CALL 


GB 


4E7C 6F 


00871 


LD 


L,A 


4E7D CDBB4E 


00872 


CALL 


GB 


4E80 67 


00873 


LD 


H,A 


4E81 CDBB4E 


00874 LMOV 


CALL 


GB 


4E84 77 


00875 


LD 


(HL) ,A 


4E85 BE 


00876 


CP 


(HL) 


4E86 2005 


00877 


JR 


NZ,LER1 


4E88 23 


00878 


INC 


HL 


4E89 10F6 


00879 


DJNZ 


LMOV 


4E8B 18DC 


00880 


JR 


LMAN 


4E8D 3E16 


00881 LERl 


LD 


A, 22 


4E8F 01 


00882 


DB 


1 


4E90 3E14 


00883 LER2 


LD 


A, 20 


4E92 B7 


00884 


OR 


A 


4E93 C9 


00885 
00886 ; 


RET 




4E94 FE02 


00887 LXFR 


CP 


2 


4E96 2014 


00888 


JR 


NZfLLCOM 


4E98 CDBB4E 


00889 


CALL 


GB 


4E9B FE02 


00890 


CP 


2 


4E9D 20F1 


00891 


JR 


NZ,LER2 


4E9F CDBB4E 


00892 


CALL 


GB 



;C/R? EOL? 

;Y 

; COMMA? 
;Y, IGNOR 
; SPACE? 
;N0, RET 
; IGNOR SPAC 
;LOOP 



;LOAD AREA 

;ERR 

;GET XPR ADR 



SAV REGS 

VAL DRIVE 

DRIVE NOT READY 

IY=DCT 

INP BUFF 

SW REGS 

GET BYT 

COMM? 

Y 

LOAD BLK? 

NO 

GET BLK LEN 

GET MEM BLK 

STO IN CNT 

GET LD ADR LSM 

XFR 

GET MSB 

XFR MSB 

GET OBJ BYT 

STO IN MEM 

VERF LD 

BAD MEM 

BMP ADR 

LOOP 

DO NEXT BLK 

MEM FAULT 

PROT A 

NOT A PGRM 

SET ERR 



;XFR ADR? 

;N0 

;GET NXT BYT 

;MUST BE 2 

;N0. A PRGM 

;GET XFR ADR 
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4EA2 6F 


00893 




LD 


L,A 


4EA3 CDBB4E 


00894 




CALL 


GB 


4EA6 67 


00895 




LD 


H,A 


4EA7 224B48 


00896 




LD 


(W3) ,HL 


4EAA AF 


00897 




XOR 


A 


4EAB C9 


00898 
00899 ; 




RET 




4EAC FE20 


00900 LLCOM 


GP 


32 


4EAE 30E0 


00901 




JR 


NG,LER2 


4EB0 GDBB4E 


00902 LCOM 


GALL 


GB 


4F.B3 47 


00903 




LD 


B,A 


4EB4 CDBB4E 


00904 LCOMX 


GALL 


GB 


4EB7 10FB 


00905 




DJNZ 


LGOMX 


4EB9 18AE 


00906 
00907 ; 


• 

r 


JR 


LMAN 


4 EBB D9 


00908 GB 


EXX 




4EBC 7D 


00909 




T.D 


A,L 


4EBD B7 


00910 




OR 


A 


4EBE 2016 


00911 




JR 


NZ,GB1 


4EC0 FD4E00 


00912 




LD 


G,(iy) 


4EC3 CD0946 


00913 




GALL 


@RSEG 


4EC6 2802 


00914 




JR 


Z,GB2 


4EC8 Dl 


00915 




POP 


DE 


4EC9 C9 


00916 




RET 




4 EGA IC 


00917 


GB2 


ING 


E 


4ECB FD7E07 


00918 




LD 


A, (iy+7) 


4ECE E67F 


00919 




AND 


127 


4ED0 BB 


00920 




GP 


E 


4ED1 2003 


00921 




JR 


NZrGBl 


4ED3 1E00 


00922 




LD 


E,0 


4 EDS 14 


00923 




ING 


D 


4ED6 7E 


00924 


GBl 


LD 


A, (HL) 


4RT)7 2C 


00925 




ING 


L 


4ED8 P9 


00926 




EXX 




4ED9 C9 


00927 
00928 


s 
/ 


RET 




4 EDA 


00929 


EXEC 


EQU 


$ 


4 EDA E5 


00930 




PUSH 


HL 


4EDB CD534E 


00931 




GALL 


LOAD 


4EDE £1 


00932 




POP 


HL 


4 RDF C0 


00933 




RET 


NZ 


4EE0 E5 


00934 




PUSH 


HL 


4EE1 2A4B48 


00935 




LD 


HL,(W3) 


4EE4 E3 


00936 




EX 


(SP) ,HL 


4EE5 C9 


00937 
00938 


• 

r 


RET 






00939 


; 


ENQUE/DEQUE AN IN^ 








A=SLOT 


', DE->RTN 




00940 


• 






4EE6 CDA04A 


00941 


ENQUE 


GALL 


SAVREG 


4EE9 FE0A 


00942 




GP 


10 


4EEB D0 


00943 




RET 


NG 


4EEC 210D47 


00944 




LD 


HL,INTQUE 


4EEF 87 


00945 




ADD 


A, A 



;STO LSB 

;GET MSB 

;STO 

;STO IN ADR 

;N0 ERR 



;GOMM? 

;NOT A PRGM 

;GET GOM LEN 

;XFR 

;SKIP BYT 

;LOOP 

;GONT 

;SW REGS 

;GET PTR LSB 

;GET SEG? 

;N0 

;GET DRV 

;READ SEG 

;0K 

;KILL INT GALL 

;BMP SEG 

;GET # SEG/TRK 

;MASK 

;BMP TRK? 

;N0 

; RESET SEG 

;BMP TRK 

•GET BYT 

;BMP PTR 

;SW REGS 



;SAVE HL 
;LOAD FILE 
;RESTO HL 
;ERR 

;SAVE HL 
;GET XFR ADR 
;RES HLr PUSH JMP 
;XFR TO BIN 



;SAV REGS 
;BAD SLOT? 
;Y, RET 
;QUE PTRS 
; DOUBLE A 
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4EF0 


85 


00946 




ADD 


A,L 


;ADD PTR OFFSET 


4EF1 


6F 


00947 




T.n 


L,A 


;XFR 


4EF2 


F3 


00948 




DI 




; DISABLE INT 


4EF3 


73 


00949 




LD 


(HL),E 


;STOR LSB RTN 


4EF4 


23 


00950 




INC 


HL 


;BMP PTR 


4EF5 


72 


00951 




LD 


(HL) ,D 


;STO MSB RTN 


4EF6 


FB 


00952 




EI 


r 


; ENABLE INT 


4EP7 


C9 


00953 




RET 






4EF8 


116E49 


00954 


DEQUE 


LD 


DE,RETINT 


;SLOT NULLER 


4EFB 


18E9 


00955 
00956 


• 


JR 


ENQUE 


; CONT 


4EFD 




00957 


ERRORD 


EQU 


$ 




4EFD 


32FA4D 


00958 




LD 


(INT) ,A 


;STO VAL 


4F00 


211B4F 


00959 




LD 


HL,@ERM1 


;PLAC TO ONV 


4F03 


4C 


00960 




LD 


C,H 


;N0 LEAD 0'S 


4F04 


CD0E4E 


00961 




CALL 


CI2 


;CONV TO DEC 


4F07 


210D4F 


00962 




LD 


HL,@ERM 


;GET MSG 


4F0A 


C33646 


00963 




JP 


@LINE 


;DISP, RET 


4F0D 




00964 


@ERM 


DM 


•System errors 


1 

1 








53 79 73 74 65 6D 20 65 72 72 


6F 72 








3A 20 








4F1B 


30300D 


00965 
00966 


@ERM1 


DM 


'00M3 




4F1E 




00967 


DOSINI 


EQU 


$ 




4F1E 


215D4F 


00968 




LD 


HL,KIDVR 


;NEW KI DVR 


4F21 


221640 


00969 




LD 


(4016H) ,HL 




4F24 


213F3C 


00970 




LD 


HL,3C3FH 


;vip 


4F27 


3E61 


00971 




LD 


A, 'a' 


;LC A 


4F29 


77 


00972 




LD 


(HL) ,A 


;STO 


4F2A 


BE 


00973 




CP 


(HL) 


;LC MOD? 


4F2B 


3620 


00974 




LD 


(HL) ,32 


;STO SPACE 


4F2D 


212750 


00975 




LD 


HL,DODVR 


;VID DVR 


4F30 


2003 


00976 




JR 


NZ,I001 


;N0 LC MOD 


4F32 


221 E40 


00977 
00978 


• 


LD 


(401EH) ,HL 


;STO NEW DVR 


4F35 




00979 


1001 


EQU 


$ 




4F35 


21CA4D 


00980 




LD 


HL,@INIT 


; INIT MSG 


4F38 


CD3646 


00981 




CALL 


@LINE 


;DISP 


4F3B 


110002 


00982 


JPDOS 


LD 


DE,200H 


;TRK2, SEC0, SYS 
;INP 


4F3E 


0E00 


00983 




LD 


C,0 


;DRIV 


4F40 


CO3046 


00984 




CALL 


@LOAD 


;LOAD OBJ 


4F43 


2001 


00985 




JR 


NZ,X12Z 




4F45 


E9 


00986 




JP 


(HL) 


;JP TO PRGM 


4F46 


CD3346 


00987 


X12Z 


CALL 


@ ERROR 


;DIS ERR 


4F49 


CD4900 


00988 




CALL 


49H 


;GET KEY 


4F4C 


F3 


00989 




DI 




;KILL INT 


4F4D 


C30D00 


00990 
00991 


; 


JP 


0DH 


; REBOOT 






00992 


; 


LOWER 


CASE/REPEAT DRIVERS 






00993 


; 








4F50 


00 


00994 


RPF 


NOP 




;RPT ON FLAG 


4F51 


00 


00995 


LSTK 


NOP 




;LAST ASCII CODE 


4F52 


0000 


00996 


DELA 


DW 





; DELAY CNT 
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4F54 00 


00997 


RATE 


NOP 


; 


RATE 


4F55 00 


00998 


CASE 


NOP 






4F56 


00999 


KPB 


DB 


0r0r0r0f0f0f0 








00 00 


00 00 00 


00 00 






01000 


; 








4F5D 


01001 


KIDVR 


EQU 


S ; 


KI DVR 


4F5D CDE303 


01002 




CALL ' 


3E3H ; 


SCAN KB 


4F60 B7 


01003 




OR 


A ; 


NEW KEY? 


4P61 CAE94F 


01004 


R012 


JP 


Z,KI1 ; 


N 


4F64 210838 


01005 




LD 


HL,3808H ; 


VID MEM 


4F67 FEIA 


01006 




CP 


26 ; 


CTRL Z 


4F69 2007 


01007 




JR 


NZ,KC1 ; 


N 


4F6B CB56 


01008 




BIT 


2,(HL) ; 


Z KEY ON? 


4F6D 2003 


01009 




JR 


NZ,KC1 : 


Y 


4P6F AF 


01010 


KC0 


XOR 


A ; 


•NUL SHIFT DWN 


4F70 1877 


01011 




JR 


KIl ; 


CON 


4F72 FEIF 


01012 


KCl 


CP 


31 J 


•CLEAR ASC 31? 


4F74 2E80 


01013 




r.D 


L,80H ; 


-HL=3880H, SHIl 


4F76 2004 


01014 




JR 


NZ,KC2 } 


•NOT CLEAR KEY 


4F78 CB46 


01015 




BIT 


0,(HL) J 


•SHIFT? 


4F7A 28F3 


01016 




JR 


Z,KC0 i 


•N, NULL CLEAR 


4F7C FE20 


01017 


KC2 


CP 


32 I 


• SPACE? 


4F7E 2013 


01018 




JR 


NZ,KC3 i 


IN 


4F80 CB46 


01019 




BIT 


0,(HL) 1 


r SHIFT? 


4F82 280F 


01020 




JR 


Z,KC3 i 


IN 


4F84 2E10 


01021 




LD 


L,10H 1 


ITO KEY 


4F86 CB46 


01022 




BIT 


0,(HL) i 


?0N? 


4F88 2809 


01023 




JR 


Z,KC3 i 


fN ' 


4F8A 3A554F 


01024 


R009 


LD 


A, (CASE) i 


?GET CASE FLAG 


4F8D 2F 


01025 




CPL 




? SWITCH 


4F8E 32554F 


01026 


R010 


LD 


(CASE) ,A 


rSTO 


4F91 18DC 


01027 




JR 


KC0 


fnul space 


4F93 4F 


01028 


KC3 


r.D 


C,A 


?STO INP KEY 


4F94 3A554F 


01029 


R011 


LD 


A, (CASE) 


rGET CASE 


4F97 B7 


0103'0 




OR 


A 


?NORM? 


4F98 79 


01031 




LD 


A,C 


?GET CHR 


4F99 281C 


01032 




JR 


Z,KI6 i 


?G0 IF NORM 


4F9B FE41 


01033 




CP 


•A' 


pLET? 


4F9D 3818 


01034 




JR 


C,KI6 


?N 


4F9F FE7B 


01035 




CP 


•z'+l 


?LET? 


4FA1 300C 


01036 




JR 


NC,KC4 


fN 


4FA3 FE61 


01037 




CP 


'a' 


?L/C? 


4FA5 3004 


01038 




JR 


NC,KC5 


? SWITCH 


4FA7 FE5B 


01039 




CP 


•Z'+l 


fLET? 


4FA9 300C 


01040 




JR 


NC,KI6 


fN 


4FAB EE20 


01041 


KC5 


XOR 


20H 


f SWITCH CASE 


4FAD 1808 


01042 




JR 


KI6 


fCON 


4FAF FE61 


01043 


KC4 


CP 


•a' 


fL/C? 


4FB1 3804 


01044 




JR 


C,KI6 


?N 


4FB3 PE7B 


01045 




CP 


•z'+l 


fL/C? 


4FB5 30F4 


01046 




JR 


NC,KC5 


fN 


4FB7 FEIF 


01047 


KI6 


CP 


31 


fCLR? 


4FB9 2810 


01048 




JR 


Z,KI6A 


;Y 


4FBB 2E40 


01049 




LD 


L,40H 


;HLs3840H 

Listing Continued . 



Machine-language Disk I/O 166 



Small Operating System 



Continued Listing 

4FBD CB4E 
4FBF 280A 
4FC1 FE60 
4FC3 30E6 
4FC5 E67F 

4PC7 D620 
4FC9 C680 

4FCB 

4FCB 3 2 51 4 F 
4FCE F5 
4FCF AF 
4FD0 32504F 
4FD3 218001 
4FD6 22524F 
4FD9 213640 

4FDC 1156 4P 
4FDF 010700 
4FE2 EDB0 
4FE4 Fl 
4FE5 C9 



4FE6 

4FE7 

4FE9 

4FEC 

4FEF 

4FF1 

4FF2 

4FF3 

4FF5 

4FF6 

4FF7 

4FF9 

4FFC 

4FFD 

4FFF 

5002 

5003 

5006 

5007 

5008 

500A 

500B 

500C 

500E 

5011 

5014 

5015 

5016 

5016 



AF 

18E2 

213640 

11564F 

0607 

lA 

BE 

20F1 

23 

13 

10F8 

3A504F 

B7 

2017 

2A524F 

2B 

22524F 

7D 

B4 

2802 

AF 

C9 

3E46 

32544F 

32504F 

AF 

C9 

21544F 



01050 
01051 
01052 
01053 
01054 

01055 
01056 

01057 R004 

01058 KI6A 
01059 
01060 

01061 R001 
01062 

01063 R005 
01064 



01065 

01066 

01067 

01068 

01069 

01070 

01071 

01072 

01073 

01074 

01075 

01076 

01077 

01078 

01079 

01080 

01081 

01082 

01083 

01084 

01085 

01086 

01087 

01088 

01089 

01090 

01091 

01092 

01093 

01094 

01095 

01096 

01097 

01098 

01099 



R013 



KI5 

KIl 
R014 

KI2 



R002 

R006 
R007 



KI3 

R008 

R003 



R015 
KI4 



BIT 

JR 

CP 

JR 

AND 

SUB. 
ADD 

EQU 

LD 

PUSH 

XOR 

LD 

LD 

LD 

i,D 

LD 

LD 

LDIR 

POP 

RET 

XOR 

JR 

LD 

LD 

LD 

LD 

CP 

JR 

INC 

INC 

DJNZ 

LD 

OR 

JR 

LD 

DEC 

LD 

LD 

OR 

JR 

XOR 

RET 

LD 

LD 

LD 

XOR 

RET 

EQU 

LD 



1,(HL) 

Z,KI6A 
I * I 

NC,KC5 
7FH 

32 
A,128 



(LSTK) ,A 

AF 

A 

(RPF) ,A 

HL,180H 

(DELA) ,HL 

HL,4036H 

DE,KPB 
BC,7 

AF 



A 

KI6A 

HL,4036H 

DE,KPB 

B,7 

A, (DE) 

(HL) 

NZ,KI5 

HL 

DE 

KI2 

A, (RPF) 

A 

NZ,KI4 

HL, (DELA) 

HL 

(DELA) ,HL 

A,L 

H 

Z,KI3 

A 

A,70 
(RATE) ,A 
(RPF) ,A 
A 



HL,RATE 



; CLEAR PRESSED? 

;N 
;L/c? 

;MAKE U/C 
;GET REL FUNC 
;CODE 
;MAK REL 
;MAKE FUNCTION 
;CODE 

;STO KEY 

;SAV CHR 

;CLR RPT DELAY 

;RPT OFF 

/•DELAY TIME 

; INIT 

;KEYS PRESSED 

; BUFFER 

;RPT BUF 

;# BYTS 

;MOVE 

;GET CHR 

;RET 

;N0 KEY 
;CON 

;KEY BUFF 
;RPT BUF 
;CHRS TO TEST 
;GET KEY BYT 
;SAME? 

;N 

;BMP PTRS 

;LOOP 
;RPT ON? 

;? 

;Y 

; DELAY CNT 
/•START RPT? 
;RES 

/•START RPT? 

;Y 

/•NO KEY 

/•RATE VAL 
;STO 
;RPT ON 
;N0 KEY 



/•RATE BUF; RATE 
/•BUF 
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5019 


35 


01100 




DEC 


.(HL) 


;GIVE RPT KEY? 


501A 


2802 


01101 




JR 


Z,KB1 


;y 


501C 


AF 


01102 




XOR 


A 


;N0 KEY 


501D 


C9 


01103 




RET 






501E 


3E46 


01104 


KBl 


LD 


A,70 


;RATE 


5020 


32544F 


01105 


R016 


LD , 


(RATE) ,A 


;RES RATE 


5023 




01106 


R017 


EQU 


$ 




5023 


3A514F 


01107 




LD 


A, (LSTK) 


;GET KEY VAL 


5026 


C9 


01108 
01109 
01110 
01111 


• 
/ 
• 

; 


RET 
VIDEO 


DRIVER 




5027 




01112 


DODVR 


EQU 


$ 




5027 


3812 


01113 




JR 


C,DD1 


;RET CUR CHAR 


5029 


79 


01114 




LD 


A,C 


;GET CHR 


502A 


FE41 


01115 




dp 


•A' 


;LET? 


50 2C 


380C 


01116 




JR 


C,DD0 


?N 


502E 


FE7B 


01117 




CP 


■z'+l 


;GARF? 


5030 


3008 


01118 




JR 


NC,DD0 


;Y 


5032 


FE61 


01119 




CP 


•a' 


;LC CHR? 


5034 


3008 


01120 




JR 


NC,DD2 


;Y 


5036 


FE5B 


01121 




CP 


•z'+i 


fU/C? 


5038 


3804 


01122 




JR 


C,DD2 


fY 


503A 


B7 


01123 


DD0 


OR 


A 


fNC 


503B 


C35804 


01124 


DDl 


JP 


458H 


?NORM DISP ENTRY 


503E 


DD6E03 


01125 


DD2 


LD 


L, (IX+3) 




5041 


DD6604 


01126 




LD 


H,(IX+4) 


?GET CURS ADR 


5044 


DD7E05 


01127 




LD 


A, (IX+5) 


fGET CURS CHR 


5047 


B7 


01128 




OR 


A 


?CUR ON? 


5048 


2801 


01129 




JR 


Z,DD3 


?N 


504A 


77 


01130 




LD 


(HL) ,A 


?DISP 0/L CHR 


504B 


79 


01131 


DD3 


LD 


A,C 


?GET CHR TO DISP 


504C 


C37D04 


01132 
01133 


; 


JP 


47DH 


fDISP CHR AS IS 






01134 


• 


PRINTER DRIVER EXTENTS ION 






01135 


• 
i 








504F 


3A2940 


01136 


PRDVR 


LD 


A, (4029H) ; 


ILINE COUNT 


5052 


47 


01137 




LD 


B,A 1 


fSTO 


5053 


3A2840 


01138 




LD 


A, (4028H) ; 


IMAX COUNT 


5056 


90 


01139 




SUB 


B j 


ISUB COUNT 


5057 


FE06 


01140 




CP 


6 : 


ITIME TO PAGE? 


5059 


2011 


01141 




JR 


NZ,Z0 j 


IN 


505B 


C5 


01142 




PUSH 


BC i 


•SAVE C=CHR 


505C 


0606 


01143 




LD 


B,6 J 


'# OF LINES 


505E 


0E0A 


01144 




LD 


C,10 i 


'LINE FEED 


5060 


C5 


01145 


C2 


PUSH 


BC i 


•SAVE REGS 


5061 


CD8D05 


01146 


CALLl 


CALL 


58DH ; 


CALL DVR 


5064 


CI 


01147 




POP 


BC ; 


'GET VALS 


5065 


10F9 


01148 




DJNZ 


C2 ; 


LOOP 


5067 


AF 


01149 




XOR 


A ; 


CLR LINE COUNT 


5068 


322940 


01150 




LD 


(4029H) ,A ; 


RESET 


506B 


CI 


01151 




POP 


BC ; 


GET CHR TO PR 


506C 




01152 


Z0 


EQU 


$ 




506C 


79 


01153 




LD 


A,C ; 


GET CHR 
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506D 
506F 
5071 
5074 
5075 
5075 


FE0A 
2004 
2A2940 
34 

C38D05 


5078 
5078 





01154 
01155 
01156 
01157 

01158 ZX 

01159 CALL2 

01160 ; 

01161 EOP 
01162 



CP 

JR 

LD 

INC 

EQU 

EQU 
END 



10 
NZ,ZX 

HL, (4029H) 

(HL) 

$ 

5 SDH 



DOSINI 



;LINE FEED? 

;N 

; COUNTER 

;BMP LINE COUNT 

;JP TO DVR 
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ie********is**** is* *is*******************ie*************if ********* 


* 




00001 








* 


* 




00002 


. ** 


S/OS - 


SMALL/OPERATING SYSTEM 


* 




00003 


.** 


USER INTERFACE MODULE 


•fi 


* 




00004 


. ** 


VERSION 1.0 - MODRT, I 


* 


* 




00005 


. ** 


CREATED: 08/05/82 


* 


* 




00006 


;** 


UPDATED: 08/06/82 


* 


* 




00007 


.** 


(C) 19 82 by Michael Wagner 

* 






00008 










************************************************************* 






00009 














00010 




Label ( 


equates 








00011 










4630 




00012 


©LOAD 


EQU 


4630H 


?LOAD OJB CODE 


4636 




00013 


@LINE 


EQU 


4636H 


rLINE VIDEO 


4639 




00014 


ePRINT 


EQU 


4639H 




4633 




00015 


@ ERROR 


EQU 


4633H 


f ERROR DISP 


4800 




00016 


INPBUF 


EQU 


4800H 


?DOS USER INPUT 
f BUFFER 


4840 




00017 
00018 


DRIVES 

• 


EQU 


4840H 


f HIGHEST DRIVE # 


5100 




00019 
00020 


• 
1 


ORG 


5100H 




5100 


0000 


00021 


Wl 


DW 





rWORK REGS 


5102 


0000 


00022 


W2 


DW 







5104 


0000 


00023 


W3 


DW 







5106 




00024 


@MSG 


DM 


10,'S/OSM3 










0A 53 2F 4F 53 


0D 








00025 


• 








510C 




00026 


START 


EQU 


$ 




510C 


FB 


00027 




EI 




?INT ON 


510D 


31FC41 


00028 




LD 


SP,41FCH 


?INIT STACK 


5110 


3A2040 


00029 




LD 


A, (4020H) 


?GET CURSOR LOC 


5113 


E63F 


00030 




AND 


63 


fGET LINE POSN 


5115 


2805 


00031 




JR 


Z,S00 


;AT LINE STA 


5117 


3E0D 


00032 




LD 


A,13 1 


r WRITE A C/R 


5119 


CD3300 


00033 




CALL 


33H 


', TO THE VIDEO 


511C 


210651 


00034 


S00 


LD 


HL,@MSG 


?GET 'S/OS' MSG 


511F 


CD3646 


00035 




CALL 


@LINE t 


fDISP 


5122 


3E3F 


00036 


S01 


LD 


A,'?' 1 


rGET PROMPT 


5124 


CD3300 


00037 




CALL 


33H 


f WRITE TO THE 
r VIDEO 


5127 


210048 


00038 




LD 


HL, INPBUF : 


IDOS INP BUF 


512A 


063F 


00039 




LD 


B,63 ; 


>MAX IMP 


512C 


CD4000 


00040 




CALL 


40H 


?GET INP 


512F 


38F1 


00041 




JR 


CrS01 j 


; BREAK HIT 


5131 


01B851 


00042 




LD 


BC,@ERR1 1 


• 'DRIVE' 


5134 


CD4852 


00043 




CALL 


NEXT i 


'GET NEXT CHR 


5137 


28E9 


00044 




JR 


Z,S01 ; 


-NULL LINE, REDO 
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5139 CDD751 


00045 






CALL 


GETINP 


;GET DRIVE # 


513C 384F 


00046 






JR 


C,DISE 


yGO IF OVERFLOW 


513E 204D 


00047 






JR 


NZ,DISE 


fGO IF MSB >0 


5140 3A4048 


00048 






LD 


A,(DRIVES) 


?GET # DRIVES IN 
fSYS 


5143 BB 


00049 






CP 


E 


fTOO BIG? 


5144 3847 


00050 






JR ' 


C,DISE 


rYES 


5146 7B 


00051 






LD 


A,E 


FGET DRIVE # 


5147 320051 


00052 






LD 


(W1),,A 


fSTO DRIVE # 


514A 01BE51 


00053 






LD 


BC,@ERR2 


? 'TRACK' MSG 


514D CD4852 


00054 






CALL ; , 


NEXT 


?POSN TO TRKSPEC 


5150 283B 


00055 






JR > 


Z,DISE 


?N0 TRACK 


5152 CDD751 


00056 






CALLx' 


GETINP 


?GET TRK # 


5155 3836 


00057 






JR 


C,DISE 


? OVERFLOW ERR 


5157 2034 


00058 






JR 


NZ,DISE 


?G0 IF D>0 


5159 320251 


00059 






LD 


(W2) ,A 


rSTO TKK 


515C 01C451 


00060 






LD 


BC,@ERR3 1 


f 'SECTOR' MSG 


515F CD4852 


00061 






CALL 


NEXT ) 


rPOSN TO SEC 


5162 2829 


00062 






JR 


Z,DISE 1 


rNO SEC SPEC 


5164 CDD751 


00063 






CALL 


GETINP i 


;GET SEC # 


5167 3824 


00064 






JR 


C,DISE i 


1 OVERFLOW 


51«9 2022 


00065 






JR 


NZ,DISE ; 


•D>0 ERR 


516B CD4852 


00066 






CALL 


NEXT ; 


(POSN HL TO 
fPARAMS 


516E 220451 


00067 






LD 


(W3) ,HL ! 


•STO PARAM PTR 


5171 3A0251 


00068 






LD 


A,(W2) ; 


GET TRK 


5174 57 


00069 






LD 


D,A ; 


gTO TRACK 


5175 3A0051 


00070 






LD 


A, (Wl) ; 


GET DRIVE 


5178 4F 


00071 






LD 


C,A ; 


XFR TO DRIVE REG 


5179 CD3046 


00072 






CALL 


@LOAD ; 


-LOAD OBJ CODE 


517C 2009 


00073 






JR 


NZ, ERROR ; 


GO IF ERROR 


517E 112D40 


00074 






LD 


DE,402DH ; 


DOS RET 


5181 D5 


00075 






PUSH 


DE ; 


FOR RET ADR 


5182 E5 


00076 






PUSH 


HL ; 


PUSH XFER ADR 


5183 2A0451 


00077 






LD 


HL,(W3) ; 


GET PARAM PTR 


5186 C9 


00078 
00079 


• 
1 




RET 


a 
# 


JMP TO RTN 


5187 CD3346 


00080 


ERROR 


CALL 


@ERROR ; 


DISP SYS ERROR 


518A C30C51 


00081 


STARTV JP 


START ; 


PROMPT 




00082 


; 










51 8D C5 


00083 


DISE 


PUSH 


BC 


SAVE UNIT MSG 


518E 21A051 


00084 






LD 


HL,@ERR ; 


ERR MSG 


5191 CD3646 


00085 






CALL 


@LINE 


DISPLAY 


5194 El 


00086 






POP 


HL 


GET UNIT MSG 


5195 CD3646 


00087 






CALL 


@LINE 


DISP 


5198 21CB51 


00088 






LD 


HL,@ERR4 ; 


REMAINING MSG 


519B CD3646 


00089 






CALL 


@LINE 


DISP 


519E 18EA 


00090 
00091 


; 




JR 


STARTV ; 


RESTART 


51A0 


00092 


@ERR 


DM 


•* * Invalid or missinq ',3 






2A 


20 


2A 20 49 


6E 76 61 6C 69 64 


20 






6F 


72 


20 6D 69 


73 73 69 6E 67 20 


03 


51B8 


00093 


@ERR1 


DM 


•drive', 3 








64 


72 


69 76 65 


03 





Listing Continued . . . 
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51BE 




00094 @ERR2 


DM 


•track', 3 








74 


72 


61 63 6B 


03 




51C4 




00095 @ERR3 


DM 


•sector' ,3 








73 


65 


63 74 6F 


72 03 




51CB 




00096 @ERR4 


DM 


• number * *' ,13 








20 


6E 


75 6D 62, 


65 72 20 2A 20 2A 0D 






00097 j 


» 

r 














00098 1 


r 














00099 i 


? 




GETINP2 


08/04/82 








00100 j 






CONVERT 


DEC TO TWO BYTE 


INT 






00101 ; 






RANGE 


-65535 (0-FFFFH) 








00102 , 






ENTRY : 


HL-> DEC NUMBER 








00103 , 






EXIT: 


DE=DEC VALUE 








00104 < 








Z= MSB=0 (D=0) 








00105 , 


} 






CF= OVERFLOW 








00106 , 


} 




■< 


HL->TERMINATING 


CHR 






00107 , 


• 

r 










51D7 




00108 GETINP EQU 


$ 




51D7 


E5 


00109 






PUSH 


HL 


;SAVE LINPTR 


51D8 


110000 


00110 






LD 


DE,0 


;ZERO ACCUM 


51DB 


7E 


00111 < 


310 


LD 


A,(HL) 


;GET CHR 


51DC 


FE48 


00112 






CP 


•H^ 


;HEX NUM? 


51DE 


2831 


00113 






JR 


Z , HEXINP 


;NUM IS HEX 


51 E0 


D630 


00114 






SUB 


• 01 


;MAKE CHR BIN 


51 E2 


3827 


00115 






JR 


CDDONE 


;TERM HIT 


51 E4 


FE0A 


00116 






CP 


10 


;BAD RANGE? 


51 E6 


3029 


00117 






JR 


NC, HEXINP 


;TRX HEX INP 


51E8 


23 


00118 






INC 


HL 


;BMP LINPTR 


51E9 


E5 


00119 






PUSH 


HL 


;SAVE PTR 


51 EA 


62 


00120 






LD 


H,D 


;HL=ACCUM 


51 EB 


6B 


00121 






LD 


L,E 




51 EC 


E5 


00122 






PUSH 


HL 


;SAVE REGS 


51 ED 


D5 


00123 






PUSH 


DE 




51EE 


119A19 


00124 






LD 


DE,6554 


; ACCUM MUST LESS 


51F1 


B7 


00125 






OR 


A 


;NC SET 


51F2 


ED52 


00126 






SBC 


HL,DE 


;SUB 6553 FROM 
; ACCUM 


51F4 


Dl 


00127 






POP 


DE 


;RESTO REGS 


51F5 


El 


00128 






POP 


HL 




51F6 


300E 


00129 






JR 


NC,G01 


; RESULT WILL 
; OVERFLOW 


51F8 


29 


00130 






ADD 


HL,HL 


; TIMES BY 10 


51F9 


29 


00131 






ADD 


HL,HL 




51FA 


19 


00132 






ADD 


HL,DE 




51FB 


29 


00133 






ADD 


HL,HL 




51FC 


1600 


00134 






LD 


D,0 


;ZERO D 


51FE 


5F 


00135 






LD 


E,A 


;DE=NEW DIGIT TO 
;ADD 


51FF 


19 


00136 






ADD 


HL,DE 


;ADD NEW DIGIT 


5200 


3804 


00137 






JR 


C,G01 


;G0 IF OVERFLOW 


5202 


EB 


00138 






EX 


DE,HL 


;PASS ACCUM TO DE 


5203 


El 


00139 






POP 


HL 


;GET LINPTR 


5204 


18D5 


00140 
00141 


; 




JR 


GI0 


;D0 NEXT CHR 



Listing Continued . . . 
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5206 E3 

5207 Rl 


00142 G01 
00143 


EX 
POP 


(SP) ,HL 
HL 


5208 37 


00144 


SCF 




5209 1803 


00145 


JR 


DDONEl 


520B 7A 


00146 DDONE 


LO 


, A,D 


520C B7 


00147 


OR 


A 


520D 7B 


00148 


LD 


A,E 


520E E3 


00149 DDONEl 
00150 


EX 


(SP),HL 


520F El 


00151 


POP 


HL 


5210 C9 


00152 
00153 ; 


RET 




5211 El 


00154 HEXINP 


POP 


HL 


5212 110000 


00155 


LD 


DE,0 


5215 7E 


00156 H01 


LD 


A, (HL) 


5216 FE48 


00157 


CP 


'H' 


5218 2826 


00158 


JR 


Z , HDONEX 


521A D630 


00159 


SUB 


101 


521C 3F 


00160 


CCF 




521D 3022 


00161 


JR 


NC, HDONE 


521F FE17 


00162 


CP 


•G'-'0' 


5221 301E 


00163 


JR 


NC, HDONE 


5223 FE0A 


00164 


CP 


10 


5225 380> 


00165 


JR 


C,H02 


5227 FEll 


00166 


CP 


17 


5229 3F 


00167 


CCF 




522A 3015 


00168 


JR 


NC, HDONE 


522C D607 


00169 


SUB 


7 


522E 23 


00170 H02 


INC 


HL 


522F F5 


00171 


PUSH 


AF 


5230 7A 


00172 


LD 


A,D 


5231 E6F0 


00173 


AND 


0F0H 


5233 2010 


00174 


JR 


NZ,H03 


5235 Fl 


00175 


POP 


AF 


5236 RB 


00176 


EX 


DE,HL 


5237 29 


00177 


ADD 


HL,HL 


5238 29 


00178 


ADD 


HL,HL 


5239 29 


00179 


ADD 


HL,HL 


523A 29 


00180 


ADD 


HL,HL 


523B B5 


00181 


OR 


L 


523C 6F 


00182 


LD 


L,A 


523D EB 


00183 


EX 


DE,HL 


523 E 18D5 


00184 
00185 ; 


JR 


H01 


5240 23 


00186 HDONEX 


INC 


HL 


5241 7A 


00187 HDONE 


LD 


A,D 


5242 B7 


00188 


OR 


A 


5243 7B 


00189 


r.n 


A,E 


5244 C9 


00190 


RET 


••r ** 


5245 Fl 


00191 H03 


POP 


AF 


5246 37 


00192 


SCF 





;KILL OLD LINPTR 

;KEEP CUR PTR 

;SET OVERFLOW 

;FLAG 

;CONT 

;GET MSB OF 

; RESULT 

;SET NZ,Z 

;A=LSB VALUE 

;SAVE CUR LINPTR 

;HL=ORG LINPTR 

;HL=CUR LINPTR 



RESTOR LINPTR 
RESET ACCUM 
GET NEXT CHR 
END OF NUM? 
YES 
DONE? 

• 

Y 

DONE? 

Y 

DEC DIGIT? 

Y 

HEX DIGIT? 

SWI CF 

N, TERM 

MAKE A-F REL 

BMP LINPTR 

SAVE CUR DIGIT 

WILL NEW CHR 

OVERFLOW LINE? 

? 

YES 

GET NEW CHR 

HL=ACCUM 

SHIFT ACCUM 4<- 



;CMP NEW LSB 
;XFER TO ACCUM 
;DE= ACCUM 
;D0 NEXT CHR 

;BMP LINPTR 
;GET MSB INP 
;SET NZ,Z 
;A=LSB VALUE 

;GET LAST CHR 
;SET OVERFLOW ERR 

Listing Continued . . . 



172 Chapter 9 



User Interface Module 



Continued Listing 










5247 C9 


00193 
00194 


; 


RET 




5248 7E 


00195 


NEXT 


T.D 


A,{HL) 


5249 FE0D 


00196 




CP 


13 


524B C8 


00197 




RET 


Z 


524C FE2C 


00198 




CP 


1 1 

r 


524E 2803 


00199 




JR 


Z, NEXTl 


5250 FE20 


00200 




CP 


32 


5252 C0 


00201 




RET 


NZ 


5253 23 


00202 


NEXTl 


INC 


HL 


5254 18F2 


00203 
00204 


• 


JR 


NEXT 


5256 


00205 




END 


START 


00000 total 


errors 









;GET CHR 
; C/R? 

;END OF LINE 
; COMMA? 
;YES, IGNORE 
; SPACE? 
;N0, RET 
;BMP PTR 
;LOOP 
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The Best Term Program in This Book 

As an extra bonus, I threw in this terminal program that we used in preparing this 
book It is somewhat of an intellegent terminal It allows instant resetting of the RS- 
232 parameters, buffering of incoming data, disk file I/O to the buffer, and various 
other functions. TERM will assemble in any TRS-80 assembler without problems. 

TEilM supports the baud rates: 110, 150, 300, 600, 1200, 2400, 9600; the word 
lengths: 5, 6, 7 and 8; the number of stop bits: 1 and 2; the parity check Even, Odd 
and None. 

Running TERM 

Since TERM is a machine- langauge program, it will be entered from DOS. When 
TERM is entered, it will announce itself, then immediately prompt you for the RS= 
232 settings (baud, parity, etc). You will then find yourself in the TERM menu. Most 
functions are selected from here. Here is what the TERM menu looks like: 

B - Assign the BREAK key value 

C - Clear contents of buffer 

D - Display contents of buffer 

E - Toggle "echo transmit data" switch 

L - Load a file into the buffer 

P - Print contents of buffer 

Q - Display status of RS-232 and buffer 

R - Set RS-232 parameters 

S - Transmit buffer data 

T - Enter terminal mode 

W - Write buffer to a file 

X- Exit to DOS 
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B - Assign the break key value 

This one is pretty self-explanatory. It Jets you assign the break key a particular 
value. Most host computers use CONTROL:C (ASCH 3) for the break character. 

C - Clear the contents of the buffer 

TERM has the capability of buffering incoming data, and/or load disk files into the 
buffer for transmission. This command simply clears the buffer of any data. 

D - Display contents of the buffer 

r JSnT^v "* ^''^^T **"' '°"*'"*' °^ ^^^ ^"^^^"- y°" ^«y P«"«^ by pressing 
(bHIFT) @ . You may abort the display by pressing break. The buffer is displayed 
from start to finish (unless break is hit). 

E - Toggle 'echo transmit data' switch 

When in terminal mode (see T command), echo displays whatyou are sending. This 
IS for systems that do not echo your characters back toyou. If you are comtaunicating 
with a system that echos your character and you have echo ON, you will see double 
characters when you send. This echo does NOT work when using the SEND 
(command S) command. 

L - Load a file into the buffer 

This loads a disk file into TERM's buffer. If the buffer already contains data, the 
new file wiU be concatenated to the end of the current buffer contents. This allows 
multiple file input The fUename must follow the L command, e.i: LNAME/TX. 

P - Prmt (line-print) contents of buffer 

r<5'SS^TTv'* line-prints the contents of the buffer, you may pause by pressing 
(bHIFT) @ . You may abort the printing by pressing break. The buffer is printed 
trom start to finish (unless break is hit). 

Q - Display RS-232 and buffer status 

This displays the current RS-232 settings, how many characters in the buffer, and 
how many unused bytes remain in the buffer. 
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R - Set the RS-232 parameters 

This invokes the same protocol queries that you answered at the start of the 
program. This allows you to re-program the RS-232 whenever you desire. 

S - Send buffer contents ' 

This command transmits the contents of the buffer to the host computer. You may 
pause by pressing (SHIFT) *@'. You may abort the send by pressing break The 
buffer is sent from start to finish (unless break is hit). 

T - Enter terminal mode 

When this function is selected, you will enter the terminal mode. This lets you 
directly communicate via the keyboard and video monitor to the host computer. 
When in the terminal mode, the CLEAR key becomes your CONTROL key, e.g. 
CLEAR: C sends a control C, You may buffer incoming data at any time by pressing 
CLEAR Q. You may turn off the buffering by pressing CLEAR P. You may exit the 
term.inal back to the menu by pressing SHIFT BREAK The incoming data 
buffering is always OFF when entering the terminal mode. 

W - Write buffer to a disk file 

This allows you to write the buffer to a disk file for loading into you word processor 
or whatever. The filename must follow the W, e.i: W STOCK/PCL. 

X - Exit to DOS 

This simply exits to DOS via the 402D DOS vector. 
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5200 

5200 
5300 

5320 00 

5321 00 



00E8 
00E9 
00EA 
00m 



5322 00 



5323 

5323 

5324 

5326 

5327 

5329 

532B 

532C 

532F 

5330 

5332 

5334 

5336 

5338 

533A 

533B 

533C 

533D 

533E 

5340 

5342 

5344 

5345 

5347 

5349 

534A 

534B 

534C 

534D 

534E 

534P 

5350 

5351 

5352 



P3 

£BEk 

07 

3028 

DBB3 

4P 

3AED55 

B7 

2802 

C8B9 

TBEh 

E638 

280F 

0F 

0F 

0F 

0F 

0£9F 

3807 

0ES7 

0F 

3802 

0£BF 

79 

00 

00 



00 
B7 
CB 
C9 
37 
FB 



00001 

00002 

00003 

00004 

00005 

00006 

00007 

00008 

00009 

00010 

00011 

00012 

00013 

00014 

00015 

00016 

00017 

00018 

00019 

00020 

00021 

00022 

00023 

00024 

00025 

00026 

00027 

00028 

00029 

00030 

00031 

00032 

00033 

00034 

00035 

00036 

00037 

00038 

00039 

00040 

00041 

00042 

00043 

00044 

00045 

00046 

00047 

00048 

00049 

00050 

00051 

00052 

00053 

00054 

00055 



TERM - SMftRT TERMINAL PROGRAM 
VERSION 1.2 - 09/09/82 



BUFFER 
PCB 
ACURS 
ABAUEV 



MSTAT 

BAUD 

CTRL 

DATA 

INnB 

VIDF 



INPUT 



IBT 



ORG 

DEFS 
DEFS' 
NOP 
NOP 



5200H 

256 
32 



OK 



GEB 
NODATA 



RS232 - I/O DRIVERS 



BQU 
EQU 
EQU 
BQU 
EQU 
NOP 



0E8H 
0E9H 
0EAH 
0£BH 
040H 



;I/0 BUFF 

;PCB 

;CURR RS-232 PRGM 

;CUR BAUD VAL 



;MASTER RESET/MODEM STAT 

;BAUD SELBCT/SEtlSE SW 

;OCMIRCL AND RS232 STAT 

;DATA 1/0 

;INIT BYTE 

;VIDEO FILTER FLAG 



GEBS A BYTES FROM THE UART/NO WAIT 



BQU 

DI 

IN 

RLCA 

JR 

IN 

I£> 

ID 

OR 

JR 

RES 

IN 

AND 

JR 

RRCA 

RRGA 

RRCA 

RRCA 

ID 

JR 

ID 

RRCA 

JR 

ID 

LD 

NOP 

NOP 

NOP 

NOP 

OR 
EI 

RET 
SCP 
EI 



$ 

A, (CTRL) 

NC,NODATA 

A, (DATA) 

C,A 

A, (AHIB) 

A 

Z,IBT 

7,C 

A, (CTRL) 

38H 

Z,OK 



C,159 

C,OK 

C,151 

C,OK 

C,191 

A,C 



DISABLE INTERRUPTS 

GET STAT RBS 

GET DRQ IN CARRY 

GO IF NO DATA RCVD 

GET BYTE 

SAVE BYTE 

HI BIT STRIP? 

SET 

N 

KILL HI BIT 

GET STAT 

ERROR? 

IF NOT 



;PARITY ERR 



;FRAME ERR 
;CVER BUN 
;GEr CHAR 



;GEr FLflGS 
jmRBLE INT 

;N0 CHR 
;Q1ABLES INT 
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5353 C9 



5354 

5354 F3 

5355 4F 

5356 DBEA 
5358 CB77 
535A 28FA 

535C tI 
535D D3E8 
535F FB 
5360 C9 



5361 

5361 D3E8 
5363 D3E9 

5365 79 

5366 03EA 
5368 C9 



5369 

5369 7E 
536A FE0D 
536C C8 
536D FE20 
536F C0 

5370 23 

5371 18F6 



5373 

5373 DBEB 
5375 PEPF 
5377 C2CA53 
537A 218253 
537D CD045C 

5380 AF 

5381 C9 
5382 



53A1 0D 
53A2 0F 



00056 

00057 ; 

00058 ; 

00059 ; 

00060 OUTPUT 
00061 
00062 
00063 CXJTl 
00064 
00065 
00066 
00067 
00068 
00069 
00070 

00071 ; 

00072 ; 

00073 ; 

00074 INITIO 
00075 
00076 
00077 
00078 
00079 
00080 
00081 
00082 
00083 
00084 

00085 NEXT 
00086 
00087 
00088 
00089 
00090 
00091 
00092 

00093 ; 

00094 ; 
00095 
00096 
00097 
00098 
00099 
00100 
00101 
00102 
00103 
00104 PSN 

53 79 
71 75 
20 52 



RET 



;REIURN 



f 

START 



PUOS A BYTE TO THE UART 



BQU 

DI 

LD 

IN 

BIT 

JR 

LD 
OUT 
EI 
RET 



C A 

aI(ccrl) 

6, A 
Z,OUTL 

A,C 
(DATA) ,A 



;DISABLE INT 

;SAVE BYTE 

;GEr STAIUS 

;CEfflCK TKANSMIT HOLDING 

;G0 IF CURRENT BYTE NOT 

;GONE YET 

;GE!F BYTE 

;OUTPUT BYTE 

•LIABLE INT 

;RE!njRN 



INITIALIZED RS-232 UfiRT 



BQU 

OUT 

OUT 

LD 

OUT 

REIT 



(MSTAT) ,A 
(BAUD), A 
A C 
(CTRL), A 



;RESETS RS-232 
;SELECr BAUD 
;GEr CIRL WORD 
;LCIAD INFO 
;REIURN 



TAKES NEXT DECIMAL INPUT AT (HL) AND PUTS IT IN 
DE. C SET IS NUMBER WAS BIGGER OHAN 65530 
ALL REGS USE. HIr=CHAR AFTER LAST MJMBER 



BQU 

LD 

CP 

RET 

CP 

RETT 

INC 

JR 



$ 

A,(HL) 

13 

Z 

32 

NZ 

HL 

NEXT 



;GEr CHR 
;C/R? 
;YES. B3L 
; SPACE? 
;N0 

;L00iP 



PROGRAM START 



BQU $ 

IN A, (DATA) 

CP 255 

JP NZ,SOK 

W HL,RSN 

CALL DLINE 

XOR A 

RET 

DEFM 'System not equipped with RS232r 

73 74 65 6D 20 6E 6F 74 20 65 

69 70 70 65 64 20 77 69 74 68 

53 32 33 32 21 



INP DATA REG 

IS RS232 THERE? 

YES 

ERRMS6 

DIS 

m ER 



00105 
00106 



INITM 



DEEB 
DEFB 



13 
15 
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53A3 



00107 DEFM 'TERM - MOW' 
54 45 52 4D 20 2D 20 4D 4A 57 



53AD 27 


00108 


DKbB 


39 




53AE 


00109 


DEEM 


'S TERMINAL PROGRAM VER 1.1' 




53 20 


54 45 52 


4D 49 4E 41 4C 20 50 




52 4F 47 52 41 


4D 20 56,45 52 20 31 




2E 31 








53C8 0A 


00110 


DEtB 


10 




53C9 0D 


00111 


DEtB 


13 




53CA 


00112 SOK 


BQU 


$ 




53CA CDC901 


00113 


CALL 


1C9H 


;rriR 


53CD 21A253 


00114 


ID 


HLrlNim 


;INIT MSG 


53D0 CD045C 


00115 


CALL 


DLINE 


;DIS 


53D3 2A2040 


00116 


ID 


HL,(4020H) 


;GEJr COR LOC 


53D6 221ff>A 


00117 


ID 


(OMO) ,HL 




53D9 CDAD5A 


00118 


CALL 


RiatT 


;SEr RS-232 PARAMS 


53DC 


00119 MAIN 


BQU 


$ 


w "^ - ^~ ^ ^^"^ ^^^^ ^fm ^ ^ AA ^b AA jq^ 


53DC 215P54 


00120 


ID 


HL,MEMUD 


;GEr MENU 


53DP CD045C 


00121 


CALL 


DLINE 


;Dis 


53E2 2A2040 


00122 


ID 


HL,(4020H) 


;GEP CORLOC 


53E5 22185A 


00123 


ID 


(CURLO),HL 


;STOR 


53E8 31PC41 


00124 INCMD 


LD 


SP,41PCH 


;REINIT 


53EB 21E853 


00125 


ID 


HL, INCMD 


;FOR RET 


53EE E5 


00126 


PUSH 


HL 




53EF 2A185A 

^* ^\ ^a^^^ ^^ ^^ ^^ ^^ m ^^ 


00127 


ID 


BLriOMJO) 


; PLACE TO PUT 


53F2 222040 


00128 


ID 


(4020H) ,HL 


;CUR LOC 


53F5 3EaE 


00129 


ID 


A,30 


;£«ASE TO FIQL 


53F7 CD3300 


00130 


CALL 


33H 


fDIS 


53FA AF 


00131 


XQR 


A 


; RESET 


53FB 32AD58 


00132 


ID 


(SPF) ,A 


; Mm SPOOL FLAG 


53FE 3E3E 


00133 


ID 


A,'>' 


r PROMPT 


5400 CD3300 


00134 


CALL 


33H 


•,DIS 


5403 211843 


00135 


ID 


HL,4318H 


?IN BUFF 


5406 0620 


00136 


ID 


B,32 i 


rMAX INP 


5408 cnRe>9 


00137 


CALL 


LIR ; 


rGFTT INP 


540B 38CF 


00138 


JR 


C,MAIN i 


IBREAK, DIS MEMJ 


540D 3E1F 


00139 


ID 


A,31 J 


CAA 


540F CD3300 


00140 


CALL 


33H ; 


"CLR TO QJD OF SCR 


5412 CD6953 


00141 


CALL 


NEXT J 


FQSN TO CHR 


5415 C8 


00142 
00143 ; 


RET 


Z ; 


i^l'ER HPT 




00144 ; 


BRANCHES ** 






00145 ; 








5416 CBftF 


00146 


RES 


5, A 


FORCE LONCASE 


5418 FE42 


00147 


CP 


■B' 


BREAK KEi VAL? 


541A CA2056 


00148 


JP 


Z,DEFBRK 


*" — ^^ ™ ^ w^BW^^ V ^ 4B^ m 


541D FE58 


00149 


CP 


•X' 


DOS? 


541F rA2D40 


00150 


JP 


Z,402DH 




5422 FE50 


00151 


CP 


ipi 


PRINT BUFF? 


5424 CADB58 


00152 


JP 


Z, PRINT ; 


GO 


5427 PE54 


00153 


CP 


•T' 


TERM MC^E? 


5429 CA5A58 


00154 


JP 


Z,TERM 




542C FE51 


00155 


CP 


•Q. 


QUERY STAT? 


542E CA9A56 


00156 


JP 


ZrBSTAT 




5431 FE45 


00157 


CP 


•E' 


MODE? 
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5433 CA1557 


00158 


JP 


Z,BCHO 




5436 Vbb2 


00159 


CP 


•R' 


; RESET? 


5438 QVAD5A 


00160 


JP 


Z, RESET 




543BFES7 


00161 


CP 


•w 


;SAVE BUFF? 


543D CADES8 


00162 


JP 


Z,SAVE , 




5440 FE53 


00163 


CP 


•s' 


fSEtlD BUFF? 


5442 CAD358 


00164 


JP 


ZrSEM> 




5445 FE44 


00165 


CP 


•D" 


;DISELfiy BUFF? 


5447 CAD858 


00166 


JP 


Z,DISP 




544A FE4C 


00167 


CP 


■L' 


;Tf»VD BUFF? 


544C CA7A59 


00168 


JP 


Z,LCAD 




544F FE41 


00169 


CP 


'A* 


;SEN ASCII? 


5451 C2^5B 


00170 


JP 


Z, ASCII 




5454 FE48 


00171 


CP 


•H' 


;TOG HT BIT STRIP 


5456 CA0256 


00172 


JP 


z,Bi'iy 


;Y 


5459 FE43 


00173 


CP 


•c 


; CLEAR BUFF? 


545B CA4457 


00174 


JP 


Z,CLEAR 




545E C9 


00175 


RET 




;N0 CHD, MQIU 


545F 


00176 MENUD 


BQU 


$ 




545F 0F 


00177 


DEb'ti 


15 




5460 IC 


00178 


DEFB 


28 




5461 IF 


00179 


DEtB 


31 




5462 


00180 


DEEM 


'B - Assign 


the BRERK key value' 




42 20 


2D 20 41 


73 73 69 67 6E 20 74 




68 65 


20 42 52 


45 41 4B 20 6B 65 79 




20 76 


61 6C 75 


65 


' 


5480 0A 


00181 


DKb'B 


10 




5481 


00182 


DEFM 


'C - Clear contaits of buffer' 




43 20 


2D 20 43 


6C 65 61 72 20 63 6F 




6E 74 65 6E 74 73 20 6F 66 20 62 75 




66 66 


65 72 






549D 0A 


00183 


DKb'B 


10 




549E 


00184 


•DEFM 


•D - Display 


' cont^its of buffer' 




44 20 2D 20 44 69 73 70 6C 61 79 20 




63 6F 6E 74 65 6E 74 73 20 6F 66 20 




62 75 


66 66 65 72 




54BC 0A 


00185 


DEtB 


10 




54BD 


00186 


DEFM 


•E - Toggle 


"echo transmit data" switch 




45 20 


2D 20 54 6F 67 67 6C 65 20 22 




65 63 68 6F 20 74 72 61 6E 73 6D 69 




74 20 64 61 74 61 22 20 73 77 69 74 




63 68 








54E3 0A 


00187 


DKbB 


10 




54E4 


00188 


DEEn 


'L - Load a 


file into the buffer" 




4C 20 2D 20 4C 6F 61 64 20 61 20 66 




69 6C 65 20 69 6E 74 6F 20 74 68 65 




20 62 75 66 66 


65 72 




5503 0A 


00189 


DEFB 


10 




5504 


00190 


DEFM 


•P - Print contents of buffer' 




50 20 2D 20 50 72 69 6E 74 20 63 6F 




6E 74 65 6E 74 73 20 6F 66 20 62 75 




66 66 


65 72 






5520 0A 


00191 


DEtB 


10 




5521 


00192 


DEFM 


'Q - Display status of RS-232 and buffe 



Machine-language Disk I/O 181 



lerm Jr'rogram 



5548 0A 
5549 



5562 0A 
5563 



557B 0A 
557C 



5593 0A 
5594 



55AE 0A 
55AP 



55BE 0D 
55BP 

55CA 00 
55CB 



550A 00 
55IB 



55BC 03 



55ED 
55EE 



5601 

5602 

5602 

5605 

5606 

5609 

560A 

5600 

5610 

5613 



03 

3AED55 
2P 

32ED55 

P5 

21EE55 

CD045C 

213057 

Fl 



00193 
00194 



51 20 
73 74 
20 32 
66 65 



00195 
00196 



52 20 
33 32 
73 



20 20 44 
61 74 75 
33 32 20 
72 

OEEB 

OEEiyi 
20 20 53 
20 70 61 



69 73 70 6C 61 79 20 
73 20 6F 66 20 52 53 
61 6E 64 20 62 75 66 

10 

•R - Set RS-232 parameters' 
65 74 20 52 53 20 32 
72 61 60 65 74 65 72 



00197 
00198 



53 20 
20 62 



00199 
00200 



54 20 
72 60 



00201 
00202 



57 20 
66 66 
6C 65 



OEEB 
OEFM 
20 20 54 
75 66 66 
OEEB 
OEFM 
20 20 45 
69 6E 61 
OEEB 
OEFM 
20 20 57 
65 72 20 



10 

•S- 
72 61 
65 72 

10 

«T- 

6E 74 
6C 20 
10 

•w- 

72 69 
74 6F 



Transmit buffer data' 
6E 73 60 69 74 
20 64 61 74 61 

Enter terminal mode' 
65 72 20 74 65 
60 6F 64 65 

Write buffer to a file' 
74 65 20 62 75 
20 61 20 66 69 



00203 
00204 

00205 
00206 



00207 
00208 



00209 
00210 
00211 
00212 
00213 
00214 



58 20 
44 4F 

BAO 
42 61 

PAR 
50 61 
72 6F 

ABRKM 
42 72 
6C 75 



OEPB 
OEFM 

20 20 45 

53 
OEEB 
DEEU 

64 20 63 
OEEB 
OEFM 

72 61 60 
72 

OEEB 

OEFM 

65 61 6B 
65 3F 20 

OEEB 



10 

•X - Exit to OOS' 
78 69 74 20 74 6F 20 

13 

'Bad ccsnmand' 
6F 60 60 61 6E 64 

13 

•Paraneter error' 
65 74 65 72 20 65 72 

13 

^Break key value? ' 
20 6B 65 79 20 76 61 



TOQG HIT BIT STRIP 



00215 

00216 

00217 

00218 

00219 

00220 

00221 

00222 

00223 

00224 



AHIB NOP 
AHIBM OEFM 
42 49 54 20 37 
49 4E 20 4E 4F 
OEEB 



BIOS 



EQU 
ID 

CPL 

W 

PUSH 

I£> 

CALL 

ID 

POP 



•BIT 7 STRIP IN NOW 
20 :>J 54 52 49 50 20 
57 20 

3 

§ 

A,(AHIB) 



(AHIB) ,A 
AF 

HL,AHIBM 
OLINE 
HLri^ON 
AF 



;GEr FL 
;SWITCH 

;SAVW 

/•SAVE 
;GEr MSG 

;ois 

}GEI CN 

;GEr ooNo. 
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Term Program 



5614 B7 

5615 2003 
5617 213357 
561A CD045C 
561D C3E853 



5620 a)755B 
5623 21DB55 
5626 CX)045C 
5629 211843 
562C 0603 
562E CDBC59 
5631 380B 
5633 CD845B 

5636 14 

5637 15 

5638 20B6 
563A7B 
563B 32AC58 
563E C3755B 
5641 214F56 
5644 1803 
5646 21C855 
5649 CD045C 
564C C3E853 
564F 



00225 
00226 
00227 
00228 G36 
00229 

00230 ; 

00231 ; 

00232 ; 

00233 DEFBRK 
00234 
00235 
00236 
00237 
00238 
00239 
00240 
00241 
00242 

00243 

00244 

00245 

00246 

00247 

00248 

00249 

00250 

00251 

00252 OME 



OR 

JR . 
LD 
CALL 
JP 



A 

NZ,G36 

HL,AOFF 

TSLWE 

INCMD 



;OFF? 

;N 

;GEr MSG 

;DIS 

;RET 



DEFINE BREAK 



BKDD 

PAREI^ 
AAl 



CALL 

ID 

CALL 

LD 

LD 

CALL 

JR 

CALL 

INC 
DEC 

JR 

ID 

W 

JP 

ID 

JR 

ID 

CALL 

JP 

DEE11 



565A 0D 00253 
565B 00254 



566D 0A0D 00255 

566F 0A 00256 

5670 0A 00257 

5671 00258 



5699 03 00259 

569A 00260 

569A CDC901 00261 

569D 215B56 00262 

56A0 CD045C 00263 

56A3 U125C 00264 

56A6 2AB859 00265 

56A9 B7 00266 

56AA ED52 00267 

56AC 22D557 00268 

56AF 219257 00269 

56B2 0E01 00270 

56B4 CDD757 00271 
56B7 ED5BB859 00272 



42 75 66 66 65 

DEFB 
ASTAan DEFM 
53 74 61 74 75 
6D 61 74 69 6F 

DEEW 
AHIT DEFB 
DEFB 
DEFM 
20 20 20 20 20 
73 73 20 61 6E 
6F 20 72 65 74 
6D 65 6E 75 
DEFB 



POSNC ;CLR AA 

HL,ABRKM '.G^ MSG 

DLINE ;dis 

HL,4318H 
B,3 
LIR 
CBKDD 
GBTINP 
D 
D 

NZ,DEFBRK 
A,E 

(ABREAK),A 
POSNC 
HLfOME 
AAl 

HL,PAR 
DLINE 
INCMD 
•Buffer full' 

72 20 66 75 6C 6C 
13 
'Status infonnation' 

73 20 69 6E 66 6F 72 
6E 

0D0AH 

10 

10 



BREAK 
GES INP 

OVER 255? 

BAD 

GET DEF 

STOR 

CAA, RET 

•GET CUT OT MEM 

GETT ERR 

DIS 

RET 



20 20 20 20 

79 20 6B 65 79 20 74 

75 72 6E 20 74 6F 20 



Press any key to return to menu' 
50 72 65 



BSTAT 



BQU 

CALL 

ID 

CALL 

ID 

ID 

OR 

SBC 

ID 

ID 

ID 

CALL 

ID 



3 

$ 

1C9H 

HL,ASTA!IM 

DLINE 

DErEOP 

HLr(NB) 

A 

HL,DE 

(INT),HL 

HL,BMSG 

C,l 
CI5 
DE, (NB) 



CLS 

GKT MSG 

DIS 

GET BUFF START 

iNEXT BYTE 

CLR C 

GET # BOTE IN BUFFER 

SEOR 

GEI BUF 

NO LEAD 

caiv 

NEXT BYTE IN BUFF 



Machine-language Disk I/O 183 



56BB 2A4940 
56BE B7 
56BP ED52 
56a 22D557 
56C4 0001 

56C6 21AB57 
56C9 CDD757 
560C 2A8A5A 
56CF 22D557 
56D2 0C£!1 
56D4 216557 
56D7 CDDD57 
56DA 3A8C5A 
56DD 327057 
56B0 3A8D5A 
56E3 327C57 
56B6 216557 
56© CD045C 
56BC 3A8E5A 
56EF 21C357 
56P2 FE45 
56F4 280A 
56F6 21C857 
56F9 FE4F 
56FB 2803 
56FD 21CC57 
5700 CD045C 
5703 218A57 
5706 CD045C 
5709 216F56 
570C CD045C 
570F CD4900 
5712 C3DC53 



5715 

5715 3AB759 
5718 EEFP 
571A 32B759 
571D F5 
571E 213757 
5721 CD045C 
5724 213357 

5727 Fl 

5728 2803 
572A 213057 
572D C3045C 
5730 6F6E 

5732 0D 

5733 6P6666 
5736 0D 
5737 

5743 03 

5744 21125C 
5747 22B859 



00273 

00274 

00275 

00276 

00277 

00278 

00279 

00280 

00281 

00282 

00283 

00284 

00285 

00286 

00287 

00288 

00289 

00290 

00291 

00292 

00293 

00294 

00295 

00296 

00297 

00298 

00299 

00300 

00301 

00302 

00303 

00304 

00305 

00306 

00307 

00308 

00309 

00310 

00311 

00312 

00313 

00314 

00315 

00316 

00317 

00318 

00319 

00320 

00321 

00322 

00323 



JJJ 



ECH) 



DIST 
AON 

AOFP 



ID 

OR 

SBC 

ID 

ID 

ID 

CALL 

ID 

LD 

ID 

ID 

CALL 

LD 

ID 

W 

ID 

ID 

CALL 

ID 

ID 

CP 

JR 

ID 

CP 

JR 

ID 

CALL 

ID 

CALL 

ID 

CALL 

CALL 

JP 



00324 
00325 
00326 



AGCHO 
45 63 

CLEAR 



BQU 
ID 
XQR 
ID 
PUSH 
ID 
CALL 
ID 
POP 
JR 
ID 
JP 
DEFH. 
DEEB 
DEEK 
DEEB 
DEF14 
68 6F 20 
DEFB 
LD 
ID 



HL, (4049H) 
A 

HL,DE 

(INT),HL 
C,l 

HL,BMSG1 

CI5 

HL,(ABAIJD) 

(INT),HL 
C,l 

HL,RSTAT 
CI4 

A, (AWORD) 
(ARQ1),A 
A, (ASTOP) 
(ARQ2) ,A 
HL,RSTAT 
DLINE 
A, (APAR) 
HL,APEVEN 
•E' 

Z,JJJ 
HL,APODD 
•0' 
Z,JJJ 

HL,APNDNE 

DLINE 

HL,ARQ3 

DLINE 

HL,AHIT 

DLINE 

49H 

MAIN 



$ 

A,(HDX) 
255 

(HEK),A 
AF 

HL,ABCHO 
DLINE 
HL,AOFP 
AP 

Z,DIST 
HL,AON 
DLINE 
'on' 
13 

•off 
13 

'Echo is now ' 
69 73 20 6E 6P 
3 

HL,BOP 
(NB),HL 



GET LAST POS BYTE 

NOC 

GET FREE 

SAVE 

NO LEAD 

GET BUFF 

O0N7 



;DISPIiAy 



;Dis 

/•DISPLAY TXT 

;get return msg 

;dis 

;WAIT FCR KEY 

;RET 



/•GET ECHO SWITCH 

;swncH 

;SAVE 
;SAVE 

;pis 

;GBr OFF MSG 
;GEr STAT 
;G0 IF OFF 

;DIS & RET 



77 20 

; START OF BUFF 
;NEXT BYT 
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574A 22BA59 
574D 215657 
5750 CD045C 
5753 C3E853 

5756 



5764 0D 
5765 

5770 

577C 



5789 03 
57 8A 

5791 0A 
5792 



57AB 



57C2 03 
57C3 4576656E 
57C7 03 
57C8 4F6464 
57CB 03 
57CC 

57D4 03 



00327 U) (CB) ,HL 

00328 IJ3 HL,BCLE 
m329 CALL MilME 

00330 «JP INCMD 

00331 ; 

00332 BCLE DEEn 
42 75 66 66 65 
65 64 

00333 DEFB 

00334 KSTAT DEEM 
30 30 30 30 20 

00335 ARQl DEFM 
58 20 42 69 74 

00336 ARQ2 DEEM 
58 20 73 74 6F 
20 

00337 DEEB 

00338 ARQ3 DEEM 
20 50 61 72 69 

00339 DEEB 

00340 BMSG DEEM 
30 30 30 30 30 

74 65 72 73 20 
20 

00341 BMSGl DEEM 
30 30 30 30 30 

75 66 66 65 72 

00342 D^B 

00343 APEVEN DEEM 

00344 DEEB 

00345 AFOED DEEM 

00346 DEFB 

00347 APNCME DEEM 
44 69 73 61 62 

DEFB 



;COR BOT 
;GEr MS6 
;DIS 
;O0NT 



57D5 0000 
57D7 111027 
57DA CDF457 
57DD 11E803 
57 E0 CDF457 
57 E3 116400 
57E6 CDF457 
57 E9 110A00 
57 EC C33F457 
57 EF 3AD557 
57F2 1827 
57F4 C5 
57F5 0600 
57F7 iS 
57F8 2AD557 
57FB B7 



00348 

00349 

00350 

00351 

00352 

00353 

00354 

00355 

00356 

00357 

00358 

00359 

00360 

00361 

00362 

00363 

00364 

00365 

00366 

00367 

00368 



'Buffer cleared' 
72 20 63 6C 65 61 72 

13 

■0000 Baud, ■ 
42 61 75 64 2C 20 

'X Bit word, ' 
20 77 6F 72 64 2C 20 

'X stop bits, • 
70 20 62 69 74 73 2C 



• Parity' 
74 79 

•00000 Characters stored, 
20 43 68 61 72 61 63 
73 74 6F 72 65 64 2C 

'00000 Free buffer bytes' 
20 46 72 65 65 20 62 
20 62 79 74 65 73 

3 

'Even' 

3 

'Odd' 

3 

'Disabled' 

6C 65 64 
3 



t 

INT 
CIS 

CI4 

CI3 

CI2 

CVI 

LOP 



PUTS DECIMAL EQU OF (INT) VMJJE. 
ENTRY : HL->DEST, 0=0 LEADING ZEROS 



DEEW 
ID 
a\LL 
ID 

CALL 

ID 

CALL 

ID 

CALL 

ID 

JR 

PUSH 

ID 

PUSH 

ID 

OR 





DE, 10000 

on 

DE,1000 

on 

DE,100 

CVI 

DE,10 

CVI 

A, (lOT) 

LQP4 

BC 

B,0 

HL 

HL,(IMr) 

A 
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57PC 

57FE 

5800 

5801 

5802 

5803 

5805 

5807 

5808 

580B 

580C 

580D 

580E 

580F 

5811 

5813 

5815 

5816 

5817 

5819 

581B 

581D 

581E 

581F 

5820 

5821 

5822 

5823 



ED52 

3807 

F5 

04 

Fl 

2803 

18F4 

19 

22D557 

78 

EL 

a 

B7 

2804 

0E00 

1806 

79 

B7 

2802 

3ED0 

C630 

77 

23 

CS 

IC 

IF 

0E 



5858 0A 

5859 0D 



585A 

585A 

585D 

5860 

5862 

5862 

5865 

5867 

586A 

586D 

586E 

5870 

5872 

5874 

5876 

5878 

5879 



212058 
CD045C 
1838 

CD2353 

3803 

CDAE58 

CD2B00 

B7 

28F2 

FE01 

282C 

PELF 

28E^ 

4F 

3A4038 



00369 
00370 
00371 
00372 
00373 
00374 
00375 

00376 IiQP3 

00377 LQP2 
00378 
00379 
00380 
00381 
00382 
00383 
00384 

00385 LQP4A 
00386 
00387 
00388 
00389 LQP4 
00390 
00391 
00392 

00393 AXERM 
00394 



00395 
00396 



00397 
00398 
00399 
00400 
00401 
00402 
00403 
00404 
00405 
00406 
00407 
00408 
; 00409 
00410 
00411 
00412 
00413 
00414 
00415 
00416 
00417 
00418 



53 6D 
61 6C 
65 73 
3C 42 
73 63 



7 

TERM 



OUAIN 



NIP 



SBC HL,DE 

JR C,L0P3 

PUSH AF 

INC B 

POP AF 

JR Z,L0P2 

JR LOP 

AED HL,DE 

ID (INT) ,HL 

ID A,B 

POP HL 

POP BC 

OR A 

JR Z,L0P4A 

ID C,0 

JR L0P4 

ID A,C 

OR A 

JR Z,L0P4 

ID A,-30H&255 

ADD A,30H 

ID (HL),A 

INC HL 

RET 

DEEB 28 

DEEB 31 

DEFB 14 

DEFM 'Smart terminal mode - Press <SHIFT>-<BREAK> to 
escape' 

61 72 74 20 74 65 72 6D 69 6E 

20 6D 6F 64 65 20 2D 20 50 72 

73 20 3C 53 48 49 46 54 3E 2D 

52 45 41 4B 3E 20 74 6F 20 65 
61 70 65 

DEFB 10 

DEEB 13 

TERM RCXJTINE 



ID 

CALL 

JR 

BQU 

CALL 

JR 

Q\LL 

CALL 

OR 

JR 

CP 

JR 

CP 

JR 

ID 

ID 



HL,ATERM 

DLINE 

NDI 

$ 

INPUT 

C,NIP 

ooroEv 

2BH 

A 

Z,TMAIN 

1 

Z,CSiJ 

31 

ZfOmiN 

C,A 

A, (3840H) 



;6Er MSG 

;DIS 

;GON 

;FECm UART INP 

;N0 INPUT 

;CUTPUT TO DO, HJFFER 

;GET A KEY 

;SET F 

;N0 KEHNP 

;BREAK 

;CHECK 

; CLEAR <CIRL> 

;y 

;XFR CHAR 
;GET CLR 
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587C 

587E 

587F 

5881 

5883 

5885 

5887 

5889 

588B 

588E 

5891 

5892 

5894 

5895 

5898 

589A 

589B 

589E 

58A0 

58A3 

58M 

58A7 

58AA 

58AC 

58AD 

58AE 

58AE 

58AF 

58B2 

58B5 

58B6 

58B7 

58B8 

58BC 

58BF 

58a 

58C3 

58C4 

58C5 

58C6 

58CA 

58CB 

58CD 

58D0 



CB4F 

79 

280A 

B61F 

FEll 

2814 

FELa 

280F 

CD5453 

3AB759 

B7 

28CE 

79 

CD3300 

18C8 

AF 

32AD58 

18C2 

3A8038 

IF 

DftDC53 

3AflC58 

18DF 

01 

00 

4F 

CD3300 

3AAD58 

B7 

79 

C8 

ED5BB859 

2A4940 

ED52 

3808 

79 

12 

13 

ED53B859 

C9 

3E8F 

CD3300 

C36258 



58D3 115453 
58D6 180B 
58D8 3E33 
58DA 01 
58DB 3E3B 
58DD 01 
58DE 3E3.B 
58B0 5F 



00419 BIT 

00420 LD 

00421 JR 

00422 MSD 

00423 CP 

00424 JR 

00425 CP 

00426 JR 

00427 KIM CALL 

00428 W 

00429 OR 

00430 JR 

00431 ID 

00432 CALL 

00433 JR 

00434 NDI XOR 

00435 STI I£) 

00436 JR 

00437 CSW ID 

00438 RRA 

00439 JP 

00440 ID 

00441 JR 

00442 ABRE^ DEFB 

00443 SFF NOP 

00444 OUTDEV BQU 

00445 ID 

00446 CALL 

00447 ID 

00448 OR 

00449 ID 

00450 RET 

00451 ID 

00452 LD 

00453 SBC 

00454 JR 

00455 ID 

00456 ID 

00457 INC 

00458 ID 

00459 RET 

00460 NIH LD 

00461 CALL 

00462 JP 

00463 ; 

00464 ; 

00465 ; 

00466 Smo LD 

00467 JR 

00468 DISP LD 

00469 DEFB 

00470 PRINT ID 

00471 DEEB 

00472 SAVE ID 

00473 LD 



IrA 
A,C 

z,Km 
3i 

'Q'-64 

Z,STI 

•P'-64 

Z,NDI 

OUTPUT 

A,(HDX) 

A 

Z,TMAIN 

A,C 

33H 

TMAIN 

A 

(SPF) ,A 

TMAIN 

A, (3880H) 

C,MAIN 

A,{ABREAK) 

KLW 

1 

$ 

C,A 

33H 

A, (SPF) 

A 

A,C 

Z 

DE, (NB) 

HLr(4049H) 

HL,DE 

C,N1H 

A,C 

(DE) ,A 
DE 

(NB) ,DE 

A,143 

33H 

OUAIN 



;C1RL? 

;GET CHPR 

;N0 

;MAKE CIRL CHR 

; SPOOL INPUT? 

;YES 

;SPOa. OFF? 

;YES 

;SEM) 

;HALF DUPE? 

;N0 

;YES 

;DIS 

;LOQP 

; SPOOL OFF 

}3JXM SPOOL FLG 

;CONT 

;GEr CIRL BYTE 

;SHIFT IN C 

;ABOBT TERM MODE 

;GEr BREAK VAL 

;CONT 

;CEIR 1 

;MEM SPOOL FLAG 

;SAVE CHAR 

;DIS 

;GET SPOOL 

;CHECK 

;GET CHAR 

;N0 SPOOL 

;GEr CHAR 

;GET HI ME 

;0K? 

;T0 HI 

;GET CHAR 

;SIORE CHAR 

;BMP 

;STOR 

;OCNT 

;BLOCK 

;DIS 

;O0NT 



PRINT/DISPLAY/SEND BUFFER 



DE, OUTPUT 

SAl 

A,33H 

1 

A,3BH 

1 

A,1BH 

E,A 



; OUTPUT ROUTINE 
;CONT 
;DISPLAY ADR 

; PRINTER ADR 

;WRITE FILE 
tGES LSB 
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58E1 1600 


00474 




l£> 


D,0 


;0 


58E3 ED532A59 


00475 


SAl 


ID 


{OQH) ,DE 


;STOR 


58E7 4F 


00476 




ID 


C,A 


;SAVE DE^CE 


58E8 AF 


00477 




XOR 


A 


;CLR 


58E9 E5 


00478 




PUSH 


HL 


;SAVELINE 


58EA 21125C 


00479 




ID 


HL,EOP , 


;GBr BUFF 


58ED ED5BB859 00480 




ID 


DE,(NB) 


;GEr NEXT 


58F1 DP 


00481 




RSI 


18H 


;GOMPARE 


58F2 283A 


00482 




OR 


ZfPRER 


;N0 BUFF GONT 


58F4 E3 


00483 




EX 


(SP) ,HL 


;HL=FS. PUSH EQP 


58F5 ny>159 


00484 




CMiL 


SAVEI 


;OPEN FILE IF SAVE 


58F8 EI 


00485 




POP 


HL 


tGEI EUP 


58F9 CD4459 


00486 


LP 


a\T.r. 


MEMS 


;TEST IF END 


58FC 2015 


00487 




JR 


NZ,JEI 


tVUi! DGNE 


58FB 3A2A59 


00488 WDD 


ID 


A, (OQ+1) 


;GET DEVICE 


5901 FELB 


00489 




CP 


IBH 


;Fn.iE OUTPUT? 


5903 200B 


00490 




JR 


NZ,HR2 


;N0 


5905 110053 


00491 




ID 


de,fcb 


;GET FCB 


5908 CD2844 


00492 




CMI. 


4428H 


;CLOSE FILE 


590B 2803 


00493 




OR 


Z,HR2 


;N0 ESR 


590D CD7459 


00494 




a\LL 


ERROR 


;DIS mR 


5910 C3E853 


00495 


HR2 


JP 


incmd 


;RET 


5913 CD2B00 


00496 JEI 


CMJJ 


2BH 


;GEn: KE^r 


5916 FE01 


00497 JEU 


CP 


1 


;BREAK? 


5918 CAFE58 


00498 




JP 


Z,WDD 


;ABORr 


591B FE60 


00499 




CP 


96 


; SHIFT @? 


591D 2005 


msm 




JR 


NZ,JEI2 


;N0 PAUSE 


591F CD4900 


00501 




CALL 


49H 


;WAIT CN KE5f 


5922 18F2 


00502 




JR 


JKTl 


;G0 OlECK KE2 


5924 7E 


00503 JEI2 


ID 


A,(HL) 


jGES BYTE 


5925 23 


00504 




INC 


HL 


;BMP BUFF 


5926 110053 


00505 




ID 


DE,JblB 


;GEr FILE FCB 


5929 CD3300 


00506 OQ 


CALL 


33H 


IDIS/PIV'WRITE 


592C 18C8 


00507 
00508 


• 


JR 


LP 


;LOOP 


592E 213759 


00509 


PRER 


ID 


HLf FMH 


;GEr NSG 


5931 CD045C 


00510 




CMIi 


DT.TNR 


;DIS 


5934 C3E853 


00511 




JP 


INC31D 


;RE7r 


5937 


00512 FMH 


DEFH 


'Buffer enKty' 








42 75 66 66 65 72 20 65 6D 70 74 79 


5943 0D 


00513 
00514 


; 


DEEB 


13 




5944 


00515 MEMS 


BQU 


$ 


;Z=BO BUFFER 


5944 ED5BB859 00516 




ID 


DE, (NB) 


;GEn? CUR 


5948 DP 


00517 




Rsr 


18H 


;COMP 


5949 C9 


00518 




RET 






594A 


0051d 


HIGH 


EQU 


$ 


;Z-PASr HI, CUE BYTE 


594A ED5B494e 


i 00520 




ID 


DE, (4049H) 


;GET HI 


594E 13 


00521 




INC 


DE 


;BMP 


594F DP 


00522 




RSP 


18H 


;COMP 


5950 C9 


00523 
00524 


; 


RET 








00525 


; 


opeh fcb for save 






00526 


; 








5951 


00527 


SAVEI 


EQU 


$ 
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5951 79 


00528 


ID 


A,C iGET DEVICE 


5952 FEIB 


00529 


CP 


IBH ;OUTPUT TO FILE? 


5954 C0 


00530 


RET 


NZ ;N0 


5955 23 


00531 


INC 


HL ;BMP PTR 


5956 CD6953 


00532 


O^LL 


NEXT ;GEr NEXT 


5959 110053 


00533 


ID 


DE,PCB / ;( 


SET PCB 


595C 0)1044 


00534 


CALL 


441CH ;i 


MOVE FS 


595F 210052 


00535 


ID 


HL,BUFFER ;< 


SET 1/0 BUFFER 


5962 0600 


00536 


ID 


B,0 ;LRI>=256 


5964 CD2044 


00537 


CftTJ, 


4420H 


OPEI^INIT 


5967 C8 


00538 


RET 


Z 


NO ERR 


5968 CD7459 


00539 


CALL 


ERROR JDISPLAY ERR 


596B C3E853 


00540 


JP 


INCMD ;REr 


596E CD7459 


00541 ERRX 


CALL 


WiBOR 




5971 C3E853 


00542 


JP 


INCMD 




5974 P6C0 


00543 ERROR 


OR 


0C0H 


RET RET 


5976 GD0944 


00544 


CALL 


4409H 


DIS msoR 


5979 C9 


00545 
00546 ; 


RET 








00547 ; 


LOAD ROUTINE 






00548 ; 








597A 


00549 LCAD 


EQU 


$ 




597A23 


00550 


INC 


HL ; 


BMP 


597B CD6953 


00551 


CALL 


NEXT ; 


POSN 


597E CA4656 


00552 


JP 


Z,PARERR ; 


NO F/S 


5981 110053 


00553 


ID 


DEfbOi i 


GET FCB 


5984 CD1C44 


00554 


CfdjL 


441CH ; 


MOVE FS 


5987 0600 


00555 


ID 


B,0 ; 


LRL=256 


5989 210052 


00556 


ID 


HL,BUFFER ; 


BUFF 


598C CD2444 


00557 


CALL 


4424H ] 


OPEN FILE 


598F C26E59 


00558 


JP 


NZ,ERRX i 


•EBR 


5992 2AB859 


00559 


ID 


HL, (NB) i 


•NEXT BYTE LOC 


5995 CD4A59 


00560 ua 


CALL 


HIGH i 


rTEtfi' F(» OK 


5998 CA4156 


00561 


JP 


Z,OUTMEH j 


fOUT OF MEM 


599B 110053 


00562 


ID 


DE,tX:B i 


rGET FCB 


599E CD1300 


00563 


CALL 


13H i 


^GET BYTE 


59A1 C2AB59 


00564 


JP 


NZ,Q1L 


;ERR 


59M 77 


00565 


ID 


(HL) ,A 


f STORE BYTE 


59A5 23 


00566 


INC 


HL 


?yiUR 


59A6 22Ba59 


00567 


ID 


(NB),HL 


tUPD NEXT BYTE 


59A9 18EA 


00568 


JR 


LR2 


fLOOP 


59AB FELC 


00569 WL 


CP 


28 


fBOF? 


59AD 2805 


00570 


JR 


Z,£MN 


;0K 


59AF FHLD 


00571 


CP 


29 


?PAST? 


59B1 C26E59 


00572 


JP 


NZ,ERRX 


;ERR 


59B4 C3E853 


00573 EMN 


JP 


INCMD 


;RET 


59B7 00 


00574 HDK 


NOP 




jHALP DUPLEX FLAG 


59B8 125C 


00575 NB 


DEEW 


BOP 


;NEXT BYT IN BUFF 


59EA 125C 


00576 CB 

00577 ; 


DEEW 


EOP 


;CURR BYT WHILE DIS/1 




00578 ; 


LINE INPUT ROUTINE 






00579 ; 








59BC 


00580 LIR 


EQU 


$ 




59BC 3E0E 


00581 


ID 


A,14 




59BE CD3300 


00582 


CALL 


33H 
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59a ES 


00583 


PUSH 


HL 


?SAVE BUFF 


59C2 48 


00584 


ID 


C,B 


rXFER LIMIT 


59C3 0600 


00585 


ID 


B,0 


sRESET OOUMTER 


59C5 CD4900 


00586 LIRL 


CKLL 


49H 


fGlSI CHR 


59C8 FE01 


00587 


CP 


1 


?BRK? 


59CA 283B 


00588 


JR 


Z,BRKL' , 


^Y 


59CC FE0D 


00589 


CP 


13 


[DONE? 


59CE 2838 


00590 


JR 


Z,IDON 


?y 


5900 FE08 


00591 


CP 


8 


fRUB? 


59D2 2826 


00592 


JR 


Z,RUB t 


•,Y 


59D4 FEIF 


00593 


CP 


31 


rDEL LINE? 


59D6 2816 


00594 


JR 


Z,LIRD 


}Y 


59D8 5F 


00595 


ID 


E,A < 


fXFER CHR 


59D9 78 


00596 


ID 


A,B 1 


tGEI COUNT 


59nA B9 


00597 


CP 


c 


rMAX? 


59DB 28E8 


00598 


JR 


Z,LIRL 


}Y 


59DD 7B 


00599 


ID 


A,E , 


',GEI CHR 


59DE FE20 


00600 


CP 


32 i 


fOK? 


59E0 38E3 


00601 


JR 


CLIRL 1 


?N 


59E2 FE7B 


00602 


CP 


'z'+l i 


ITOO HI? 


59E4 30DF 


00603 


JR 


NC,LIRL J 


?Y 


59B6 77 


00604 


ID 


(HL) ,A 1 


fDIS 


59B7 CD3300 


00605 


OUjL 


33H ] 


fDIS 


59EA 23 


00606 


INC 


HL 1 


IBMP 


59EB 04 


00607 


INC 


B 1 


IREGS 


59EC 18D7 


00608 


JR 


LIRL j 


ICONT 


59EE 78 


00609 LIRD 


ID 


A,B ; 


IGET COUNT 


59EF B7 


00610 


OR 


A 1 


(BEG OF LIN? 


59F0 28D3 


00611 


JR 


Z,LTRL 1 


',Y 


59F2 3E08 


00612 


ID 


A,8 1 


IBKSP 


59F4 CD3300 


00613 


CALL 


33H ) 


IDIS 


59F7 05 


00614 


DEC 


B 1 


rDBC COUNT 


59F8 18F4 


00615 


JR 


LIRD i 


rOONT 


59FA 78 


00616 RB 


ID 


A,B ; 


fGET CNT 


59FB B7 


00617 


OR 


A i 


fAT BBS? 


59FC 28C7 


00618 


JR 


Z,LIRL ; 


fY 


59FE 3E08 


00619 


ID 


A,8 ; 


-BKSP 


5A00 CD3300 


00620 


CALL 


33H ] 


IDIS 


5A03 2B 


00621 


DEC 


HL ; 


r BACKUP 


5A04 05 


00622 


DEC 


B J 


•DEC COUNT 


5A05 18BE 


00623 


JR 


LIRL J 


■CONT 


5A07 37 


00624 ERKL 


SCF 




'FOR BREAK 


5A08 360D 


00625 LDCN 


LD 


(HL) ,13 i 


•C/R 


5A0A EL 


00626 


POP 


HL i 


'GET BUFF 


5A0B F5 


00627 


PUSH 


AF ; 


'SAVE CF 


5A0C 3E0F 


00628 


ID 


A,15 J 


CUR OFF 


5A0E CD3300 


00629 


CALL 


33H 




5A11 3E0D 


00630 


ID 


A,13 ; 


C/R 


5M3 CD3300 


00631 


CALL 


33H ; 


•DIS 


5A16 Fl 


00632 


POP 


AF ; 


GET CF 


5A17 C9 


00633 


RET 






5A18 0000 


00634 CURLO 


DEEW 


; 


CUR LX 


5A1A 


00635 ARSl 


DEFM 


•Baud (110,150,31! 


10,600,1200,2400,4800, 




42 61 75 64 20 28 31 31 30 2C 31 


35 




30 2C 33 30 30 2C 36 30 30 2C 31 


32 
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30 30 2C 32 34 


30 30 2C 34 38 30 30 






2C 39 36 30 30 


29 20 20 3F 20 




5M8 03 


00636 




DEbB 


3 




5M9 


00637 ARS2 


DEFM 


'Word length (5,6,7,8) ? ■ 






57 6F 72 64 20 6C 65 6E 67 74 68 20 






28 35 2 
20 


:C 36 2C 37 2C 38 29 20 20 3F 


5A62 03 


00638 


DEbB 


3 




5A63 


00639 ARS3 


DEFM 


'Stop bits (1,2] 


1 ? ' 






53 74 6F 70 20 


62 69 74 73 20 28 31 






2C 32 29 20 20 


3F 20 




5A76 03 


00640 




DKbB 


3 




5A77 


00641 


ARS4 


DEEM 


'Parity (E,0,N) 


? • 






50 61 72 69 74 79 20 28 45 2C 4F 2C 






4E 29 20 20 3F 


20 




5AB9 03 


00642 




DEFB 


3 




5A8A 0000 


00643 ABAUD 


DEEW 





jOJBBMI 


5ABC 00 


00644 PSKSO) 


NOP 






5ABD 00 


00645 


ASTOP 


NOP 






5A8E 00 


00646 APAR 


NOP 






5ABF 6E00 


00647 ABRATE 


DEEW 


110 




5A91 22 


00648 




DEEM 


in.i 




5A92 9600 


00649 




DEEW 


150 




5A94 44 


00650 




DEtB 


44H 




5A95 2C01 


00651 




DEEW 


300 




5A97 55 


00652 




DEbB 


55H 




5A98 5802 


00653 




DEEW 


600 




5A9A66 


00654 




DEEB 


66H 




5A9B B004 


00655 




DEEW 


1200 




5A9D 77 


00656 




DEbB 


77H 




5A9E 6009 


00657 




DEEW 


2400 




5AA0 AA 


00658 




DEFB 


0AAH 




5AA1 C012 


00659 




DEEW 


4800 




5AA3 CX: 


00660 




DEbB 


0OCH 




5AA4 8025 


00661 




DEEW 


9600 




5AA6 Ehl 


00662 




DEEB 


0E£H 




5AA7 0000 


00663 




DEFW 





;TEKM 


5AA9 00 


00664 ANORDL 


DEEB 







5AAA 4020 


00665 




DEFM 


•@ i 




5AAC 60 


00666 
00667 


; 


DEEB 


60H 






00668 


• 

r 


SET RS-232 PARAMETERS 






00669 


; 








5AAD 


00670 


KhbbT 


EQU 


$ 




5AAD CD755B 


00671 




CALL 


POSNC 


;POSN CUR 


5AB0 211A5A 


00672 




ID 


HL,ARS1 


;BAUDNSG 


5AB3 a)045C 


00673 




CALL 


DLINE 


;DIS 


5AB6 211843 


00674 




ID 


HL,4318H 


;IN BUF 


5AB9 0604 


00675 




ID 


B,4 


;MAX LEN 


5ABB a»C59 


00676 




CALL 


LIR 


;GEr INP 


5ABE 38ED 


00677 




JR 


C, RESET 


;BREAK HIT 


5AC0 CD845B 


00678 




CALL 


GhTlNP 


;GBr INP 


5AC3 218P5A 


00679 




ID 


HL,ABRATE 


fGET BAUD TABLE 


5AC6 4E 


00680 


BOT 


ID 


C,(HL) 


;GErBAUD# LSB 


5AC7 23 


00681 




INC 


HL 
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5AC8 46 


00682 


ID 


B, (HL) 


;MSB 


5P£9 23 


00683 


INC 


HL 




5ACA 23 


00684 


INC 


HL 




5ACB 78 


00685 


LD 


A,B 


?IS BC 0? 


5ACC Bl 


00686 


OR 


C 




5ACD 28DE 


00687 


JR 


iZ, RESET 


;Y, BAD INP 


5ACF 7A 


00688 


LD 


A,D 




5AD0 B8 


00689 


CP 


B 




5AD1 20F3 


00690 


JR 


NZ,BSr 


?TRY NEXT 


5AD3 7B 


00691 


LD 


A,E 




5AD4 B9 


00692 


CP 


C 




5AD5 20EF 


00693 


JR 


Nz,Bar 


'rTRH NEXT 


5AD7 23 


00694 


DEC 


HL 


fPOSN TO BUAD 


5 ADS 7E 


00695 


ID 


A,(HL) 




5AD9 322153 


00696 


ID 


(ABAUDV) ,A 


iiSiXJR VAL 


5ADC ED538A5A 00697 


LD 


(ABAUD) ,DE 


fstor # 




00698 ; 










00699 ; 


GET WCM3 T.FN 






00700 ; 








5AB0 


00701 a«L 


B2U 


$ 




5AE0 CD755B 


00702 


CALL 


POSNC 


?POSN CUR 


5AE3 21495A 


00703 


ID 


HL,AE^2 


?GEr M3G 


5AB6 CD045C 


00704 


CALL 


DLINE < 


?DIS 


5AE9 211843 


00705 


ID 


HL,4318H 


?IN BUF 


5AEC 0601 


00706 


ID 


B,l 1 


a CHR 


5AEE CDBC59 


00707 


CALL 


LIR i 


?GEr INP 


5AF1 38ED 


00708 


JR 


C,GWL i 


fBREAK 


5AF3 7E 


00709 


ID 


A, (HL) i 


fGEff CHR 


5AF4 328C5A 


00710 


ID 


(ANCM)) ,A i 


fSTOR 


5AE7 D635 


00711 


SUB 


35H J 


rGET REL LEN 


5AF9 38E5 


00712 


JR 


C,(Mi i 


?T0O LO 


5AEB FE04 


00713 


CP 


4 : 


•TO HI? 


5AFD 30E1 


00714 


JR 


NC,GWL j 


rY 


5AFF 21A95A 


00715 


ID 


Hr.,AWQRI^ 1 


}GEI TABLE 


5B02 1600 


00716 


ID 


D,0 1 


'0 


5B04 5F 


00717 


ID 


EfA I 


IPOR AD 


5B05 19 


00718 


ADD 


HT,,DE i 


rPT TO BYTE 


5B06 7E 


00719 


ID 


A, (HL) ; 


rGET LEN BITS 


5B07 322053 


00720 
00721 ; 


LD 


(ACURS) ,A i 


rtflDR STAT 




00722 ; 


GET STOP Bl'iy 






00723 ; 








5B0A 


00724 GRB 


BQU 


$ 




5B0A CD755B 


00725 


CALL 


POSNC i 


■POSN CUR 


5B0D 21635A 


00726 


LD 


HL,ARS3 J 


•STOP MSG 


5B10 CD045C 


00727 


GALL 


DLINE i 


"DIS 


5B13 211843 


00728 


ID 


HL,4318H J 


'INP BUF 


5B16 0601 


00729 


ID 


B,l i 


1 CHR 


5B18 CDBC59 


00730 


CALL 


LIR J 


INP 


5B1B 38ED 


0Er731 


JR 


C,GSB ; 


REDO 


5B1D 7E 


00732 


ID 


A, (HL) ; 


GETT CHR 


5ELE 328D5A 


00733 


ID 


(Ab'lOP) ,A J 


STOR 


5B21 D631 


00734 


SUB 


31H i 


MAKE REL 


5B23 38£5 


00735 


JR 


CGSB i 


(BAD INP 


5B25 FE02 


00736 


CP 


2 i 


TO HI? 
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5B27 30HL 


00737 


JR 


NCrGSB 


;Y 


5B29 0E00 


00738 


LD 


C,0 


FNO STOP 


5B2R «7 


00739 


OR 


A 


;1 STOP? 


5B2C 2802 


00740 


JR 


Z,Y1SB 


;Y 


5B2E 0EL0 


00741 


ID 


C,10H 


;2 STOP 


5B30 3A2053 


00742 YISB LD 


A,(ACURS), 


;GEr BYTE 


5B33 Bl 


00743 


OR 


C 


;ADD STOP Bi'iy 


5B34 322053 


00744 
00745 ; 


ID 


(ACURS) ,A 


;STOR 




00746 ; 


GET PARITY 






00747 ; 








5B37 


00748 GEB BQU 


$ 




5B37 CD755B 


00749 


CAT.T. 


POSNC 




5B3A 21775A 


00750 


ID 


HL,ARS4 




5B3D CD045C 


00751 


CALL 


DLINE 


;DISP 


5B40 211843 


00752 


ID 


HL,4318H 




5B43 0601 


00753 


ID 


B,l 




5B45 aec59 


00754 


CALL 


LIR 




5B48 38£D 


00755 


JR 


C,GEB 




5B4A7E 


00756 


LD 


A,(HL) 




5B4B CBAF 


00757 


RES 


5, A 


;MAKE U/C 


5B4D 328E5A 


00758 


LD 


(APAR) ,A 


;SIQR 


5B50 0E80 


00759 


ID 


C,80H 




5B52 FE45 


00760 


CP 


igi 


;EVEN? 


5B54 280C 


00761 


JR 


Z,YPX 


;Y 


5B56 0E00 


00762 


ID 


C,0 




5B58 FE4F 


00763 


CP 


'0' 




5B5A 2806 


00764 


JR 


Z,YPX 


tO£D 


5B5C 0E08 


0ff765 


ID 


C,8 




5B5E FE4E 


00766 


CP 


'N* 


;N0 PAR? 


5B60 20D5 


00767 


JR 


NZ,GPB 


;INP ERR 


5662 3A2053 


09768 YPX LD 


A, (ACURS) 


;GEir STAT 


5B65 Bl 


00769 


Ol 


C 


;ADD PARITY 


5B66 F607 


00770 


CR 


7 


;TORN ON CIRL 


5B68 322053 


00771 


ID 


(ACURS) ,A 


;STOR 


5B6B 4F 


00772 


LD 


C,A 


;Gi:.T Ci'KL WMj 


5B6C 3A2153 


00773 


LD 


A,(ABAUDV) 


•GET BAUD VAL 


5B6F CD6153 


0U774 


CMiL 


INi'lRS 


;INIT R&-232 


5B72 C3755B 


00775 
00776 ; 


JP 


POSNC 


;CAA 


5B75 


00777 POSNC BQU 


$ 




5B75 2A185A 


00778 


ID 


HL,(CURLO) 


;GEr INP POSN 


5B78 114000 


00779 


LD 


DE,64 


;# CHHS LIN 


5B7B 19 


00780 


ADD 


HL,DE 


;BMP 


5B7C 222040 


00781 


LD 


(4020H) ,HL 


;P06N CUR 


5B7F 3EaF 


00782 


ID 


A,31 


;CLR ALL AtTEK 


5B81 C33300 


00783 

00784 ; 

00785 J 


JP 


33H 


;D0 IT 




00786 j 


, GBTINP - DECIMAL & HEX INPUT DECODER 




00787 < 


} ENTRY HIi-> INP, EXIT DE^NUM 




00788 , 


f CF = 


ENTRY WAS TCX) HI 






00789 , 


• 

r 






5B84 £5 


00790 ( 


SLTINP PUSH 


HL 


;SAVE LINE 


5B85 110000 


017791 


ID 


DE,0 


; RESET 
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5B88 7E 


00792 GIN 


LD 


A, (HL) 


;GCT CHR 


5B89 FE0D 


00793 


CP 


13 


;DUN? 


5B8B 2003 


00794 


JR 


NZ,GIN2 


;N 


5B8D E3 


00795 GIN3 


EK 


(SP) ,HL 


;LINE CN STK 


5B8E El 


00796 


POP 


HL 


;GET LIN 


5B8F C9 


00797 


RET 


% 


;DUN 


5B90 23 


00798 GIN2 


INC 


HL 


;BMP LIN 


5B91 FE20 


00799 


CP 


32 


; SPACE? 


5B93 28F8 


00800 


JR 


Z,GIN3 


;DUN 


5B95 FE30 


00801 


CP 


101 


;NUM? 


5B97 3819 


00802 


JR 


C,HEKINP 


;N 


5B99 FE3A 


00803 


CP 


1. 1 

• 


;NUM? 


5B9B 3015 


00804 


JR 


NC,HRXTNP 


;N 


5B9D D630 


00805 


SUB 


30H 


;OGNV BIN 


5B9F E5 


00806 


PUSH 


HL 


;SAVELIN 


5BA0 62 


00807 


LD 


H,D 


;HL»ACCUM 


5BA1 6B 


00808 


ID 


L,E 




5BA2 29 


00809 


ADD 


HL,HL 


;HL=HL*10 


5BA3 29 


00810 


ADD 


HL,HL 




5BA4 19 


00811 


ADD 


HL,DE 




5BA5 29 


00812 


ADD 


HL,HL 




5BA6 3805 


00813 


JR 


C,GINX 


;0/V ERR 


5BA8 1600 


00814 


ID 


D,0 


;0 


5BAA5F 


00815 


ID 


E,A 


;GEr CUR DIGIT 


5BAB 19 


00816 


ADD 


HL,DE 


;AI»D DIGIT 


5BAC ES 


00817 


EK 


DE,HL 


;DB=ACCUM 


5BAD El 


00818 Gmx 


POP 


HL 


;REB'1X)R LIN 


5BAE 30D8 


00819 


JR 


NC,GIN 


;0K 


5BB0 IRDR 


00820 
00821 ; 


JR 


GIN3 


;CVERFLCW 


5BB2 EL 


00822 HEXINP 


POP 


HL 


;GET INP START 


5BB3 110000 


00823 


ID 


DE,0 


;RESET ACCUM 


5BB6 7E 


00824 HEX 


ID 


A, (HL) 


;GET DIGIT 


5BB7 FE0D 


00825 


CP 


13 


;DUN? 


5BB9 C8 


00826 


RET 


Z 


;y 


5BBAFE20 


00827 


CP 


32 


;DUN? 


5BBC C8 


00828 


RITT 


Z 


;Y 


5BBD 23 


00829 


INC 


HL 


;BMP 


5BBE FE48 


00830 


CP 


•H' 


;'HEX' SIG? 


5BC0 28F4 


00831 


JR 


Z,HEK 


;IGNQR 


5BC2 FE30 


00832 


CP 


.0. 


;0K? 


5BC4 D8 


00833 


RET 


C 


;N 


5BC5 FE47 


00834 


CP 


■G' 


;QK? 


5BC7 3F 


00835 


OCF 




;INV CP 


5BC8 D8 


00836 


RET 


C 


;N 


5BC9 FE3A 


00837 


CP 


':• 


;NUM? 


5BCB 3805 


00838 


JR 


C,HEX1 


;y 


5BCD FE41 


00839 


CP 


■A' 


;HEX? 


5BCP D8 


00840 


RET 


C 


;bad 


5BD0 D607 


008a 


SUB 


7 


;SUB AMT 


5BD2 D630 


00842 HEXl 


SUB 


30H 


;MAKEBIN 


5BD4 £B 


00843 


EX 


DE,HL 


;HL»ACCUM 


5BD5 F5 


00844 


PUSH 


AF 


;SAVE BIN 


5BD6 7C 


00845 


ID 


A,H 


;GETHSB 


5BD7 B6F0 


00846 


AND 


0F0H 


;TEbT IF MAX AL 
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5BD9 37 


00847 


SCF 




5BCA 2803 


00848 


JR 


Z,HEX7 


5BDC EB 


00849 


EK 


DE,HL 


56DD Fl 


00850 


POP 


AF 


5BDE C9 


00851 


RET 




5BDP 29 


00852 HEX7 


ADD 


HLrHL 


5BE0 29 


00853 


ADD 


HL,HL 


5BEL 29 


00854 


ADD 


HL,HL 


5BF2 29 


00855 


ADD 


HL,HL 


5BF3 Fl 


00856 


POP 


AF 


5BE4 B5 


00857 


OR 


L 


5BF5 6F 


00858 


1£> 


L,A 


5BB6 Ei 


00859 


EK 


DE,HL 


5BE7 18CD 


00860 
00861 ; 


JR 


HEX 




00862 ; 


SEND ASCII SET 




00863 ; 






5BF» 


00864 ASCII 


BQU 


$ 


5BE9 3E0D 


00865 


ID 


A,13 


5BEB CD5453 


00866 


CALL 


OUTPUT 


5BEE 3E20 


00867 


ID 


A, 32 


5BF0 CD5453 


00868 ASC 


CALL 


OUTPUT 


5BF3 0C 


00869 


INC 


C 


5BF4 CD2600 


00870 


CMJL 


2BH 


5BF7 FE01 


00871 


CP 


1 


5BF9 C8 


00872 


RET 


Z 


5BFA 79 


00873 


ID 


A,C 


5BFB FE5B 


00874 


CP 


•z'+i 


5BFD 28EA 


00875 


JR 


Z, ASCII 


5BFF 18EF 


00876 
00877 ; 


JR 


ASC 


5C01 C30052 


00878 
00879 ; 


JP 


5200H 


5C04 


00880 DLINE 


BQU 


$ 


5C04 7E 


00881 


ID 


A,(HL) 


5C05 FB03 


00882 


CP 


3 


5C07 C8 


00883 


RET 


Z 


5C08 CD3300 


00884 


CKLL 


33H 


5C0B7E 


00885 


ID 


A,(HL) 


5C0C FE0D 


00886 


CP 


13 


5C0EC8 


00887 


RET 


Z 


5C0F 23 


00888 


INC 


HL 


5a0 18F2 


00889 


JR 


DLINE 


5a2 


00890 BOP 


BQU 


$ 


5a2 


00891 


£ND 


START 


00000 total errors 







;SET C 

;0K 

;RESTQR HL, LIN 

;KILL 

;SHIFT OVER 4X 
;HI^HL*16 



;GEr DIGIT 
jMm JHW DIGIT 
;HL=AOCUM 
;DB=AOCUM 
;O0NT 



SPACE 

SEND OUT 

BMP VAL 

GET KEI 

BREAK? 

Y 

GET CHR 

DONE? 

Y 

CONT 



OUTPUT LINE TO VIDEO 
GET CHR 
mo OF TEXT? 
YES 
DISP 
;GET CHR 
EMD OF TEXT? 
YES 

M1P TXT ETR 
CONT DISP 
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WES TERN DIG I TAL 

CORPORATION 

FD1771-01 Floppy Disk Formatter/Controller 



FEATURES 

• SOFT SECTOR FORMAT COMPATIBILITY 

• AUTOMATIC TRACK SEEK WITH VERIFICATION 

• READ MODE 

Single/Multiple Sector Write with Automatic 

Sector Search or Entire Track Read 
Selectable 128 Byte or Variable Length Sector 

• WRITE MODE 

Single/Multiple Sector Write with Automatic 

Sector Search 
Entire Track Write for Diskette Formatting 

• PROGRAMMABLE CONTROLS 
Selectable Track-to-Track Stepping Time 
Selectable Head Settling and Head Engage 

Times ^ ^. 

Selectable Three Phase or Step and Direction 
and Head Positioning Motor Controls 

• SYSTEM COMPATIBILITY 

Double Buffering of Data 8-Bit Bi-Directional 

Bus for Data, Control and Status 
DMA or Programmed Data Transfers 
All Inputs and Outputs are TTL Compatible 



APPLICATIONS 

• FLOPPY OlSK DRIVE INTERFACE 

• SINGLE OR MULTIPLE DRIVE 
CONTROLLER/FORMATTER 

• NEW MINI-FLOPPY CONTROLLER 

GENERAL DESCRIPTION 

The FD1771 is a MOS/LSI device that performs the 
functions of a Floppy Disk Controller/Formatter 
The device is designed to be included in the disk 
drive electronics, and contains a flexible interface 
oraanization that accommodates the interface_sig- 
naTs from most drive manufacturers. The PDvn is 
compatible with the IBM 3740 data entry system 
format. 

The processor interface consists of an 8-bit bi- 
directional bus for data, status, and control word 
transfers. The FD1771 is set up to operate on a multi- 
plexed bus with other bus-oriented devices. 
The FD1771 is fabricated in N-channel Silicon Gate 
MOS technology and is TTL compatible on all inputs 
and outputs. The A and B suffixes are for ceramic 
and plastic packages, respectively. 



•Nl 



Vbb( 



5V)C 
WEC 

CSC 
REC 
AqC 
Al C 
DAL P C 

dalT c 

DAL2 C 

daTsc 

PAL4 E: 
DAL5C 



DAL6C 13 



DAL7C 

pm/STEP C 

PH2/D1RC C 

PH3C 

3PM C 

MRC 



(GND)VssC 20 



^^ 4otlVDD( + 12V) 
39 b INTRQ 
38 J PRO 
37 3 DINT 
36 DWPRT 
35 3 IP 
34 3TROO 
33 3WF 



FD1771 



14 
15 
16 
17 
18 
19 



3 READY 

DWD 

3WG 



29 3 TG43 



3HLD 

3 FDDATA 
26 DFDCLK 
25 3 XTDS 
24 3CLK 
23 J HLT 
22 3 TEST 
21 DVc( + 5V) 



PIN CONNECTiONS 



C 



COMPUTER 
INTERFACE 



C5 



•5V 



> 



FLOPPY DISK 
CONTROLLER 
FORMATTER 




WF 



^ss vbb ^DD ^CC 



X" 



FLOPPY 

DISK 

DRIVE 



3PM / _ 



-^--1 



H 



ONE SHOT 
(IF USED) 
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PIN OUTS 






Pin No. 



1 
19 



20 

21 
40 



Computer Interface 



Pin Name 



Power Supplies 
MASTER RESET 



2 
3 

4 

5,6 



7-14 

24 
38 



39 



WRITE ENABLE 



CHIP SELECT 



READ ENABLE 



REGISTER SELECT 
LINES 



Symbol 



ran 



DATA ACCESS LINES 



CLOCK 



DATA REQUEST 



INTERRUPT REQUEST 



Floppy DIak Interlace: 

15 



16 
17 
18 



Phase 1/Step 



Phase 2/Direction 
Phase 3 



vss 

VCC 

vdd 



WE 
CS 
RE 

Ao, Ai 



Function 



-5V 

pA logic low on this input resets the device and loads 

*'03'* into the command register. The Not Ready 

(Status bit 7) is reset during MR ACTIVE. When RH 

is brought to a logic high, a Restore Command is 

executed^ regardless of the state of the Ready signal 

from the drive. 

Ground 

+5V 

+12V 



A logic low on this input gates data on the DAL into 
the selected register when CS is low. 

A logic low on this input selects the chip and enables 
computer communication with the device. 

A logic low on this input controls the placement of 
data from a selected register on the DAL when C5 is 
low. 

These inputs select the register to receive/transfer 
data on the DAL lines under RE and WE control: 



DAL0-DAL7 



CLK 



^1 


Ao 











1 


1 





1 


1 



WE 
Command Register 
Track Register 
Sector Register 
Data Register 



DRQ 



INTRO 



3-Phase Motor Select 



PhT/step 

PH2/DIRC 

PH3 

3PM 



RE 
Status Register 
Track Register 
Sector Register 
Data Register 

Eight bit inverted bidirectional bus used for transfer 
of data, co ntrol , and status. This bus is a receiver 
enabled by WE or a transmitter enabled by Re! 

This input requires a free-running 2 MH2±1% square 
wave clock for internal timing reference. 

This open drain output indicates that the DR con- 
tains assembled data in Read operations, or the DR 
is empty in Write operations. This signal is reset 
when serviced by thecomputerthrough reading or 
loading the DR in Read or Write operation, respec- 
tively. Use 10K pull-up resistor to +5. 

This open drain output is set at the completion or 
termination of any operation and is reset when a 
new command is loaded into thecommand register. 
Use 10K pull-up resistor to +5. 

If the 3PM input is a log ic low the t hree-phase motor 
control is selected ^nd PHI, PH2, and PH3 outputs 
form a one active lo w sig nal out of three, PHI is active 
low after MR. If the 3PM input is a logic high the step 
and direction motor control is setected. The step 
output contains a 4 usee high signal for each step 
and the direction output is active high when stepping 
in; active low when stepping out. 
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Pin No. 



22 

23 

25 

26 

27 
28 
29 

30 
31 
32 



33 



34 
35 

36 

37 



Pin Name 



TEST 

HEAD LOAD TIMING 

EXTERNAL DA TA 
SEPARATION 

FLOPPY DISK CLOCK 
(External Separation) 

FLOPPY DISK DATA 

HEAD LOAD 

Track Greater than 43 

WRITE GATE 



WRITE DATA 



Ready 



Symbol 



TEST 
HLT 

XTDS 

FDCLOCK 

FDDATA 
HLD 



WRITE FAULT 



TRACK 00 



INDEX PULSE 



WRITE PROTECT 



TG43 



WG 



WD 



READY 



WF 



TROO 



IP 



WPRT 



DISK INITIALIZATION DINT 



Function 



This input is used for testing purposes only and 
should be tied to +5V or left open by the user. 

The HLT input is sampled after 10 ms. When a logic 
high is sampled on the HLT input the head is assumed 
to be engaged. 

A logic low on this input selects external data 
separation. A logic high or open selects the internal 
data separator. 

This i nput receiv es the externally separated clock 
when XTDS = 0. If XTDS = 1 , this input should be tied 
to a logic high. 

This input receives the raw read dis k data i f XTDS=1, 
or the externally separated data if XTDS=0. 

The HLD output controls the loading of the Read- 
Write head against the media. 

This output informs the drive that the Read-Write 
head is positioned betweeri tracks44-76. This output 
is valid only during Read and Write commands. 

This output is made valid when writing is to be per- 
formed on the diskette. 

This output contains both clock and data bits of 
500 ns duration. 

This input indicates disk readiness and is sampled 
for a logic high before Read or Write commands are 
performed. If Ready is low, the Read or Write oper- 
ation is not performed and an Interrupt is generated. 
A Seek operation is performed regardless of the state 
of Ready. The Ready input appears in inverted format 
as Status Register bit 7. 

This input detects wiring faults indications from the 
drive. When WG=1 and WF goes low, the current 
Write command is terminated and the Write Fault 
status bit is set. The WF input should be made inactive 
(high) when WG becomes inactive. 

This input informs the FD1771 that the Read-Write 
head is positioned over Track 00 when a logic low. 

Input, when low for a minimum of 10 usee, informs 
the FD1771 when an index mark is encountered on 
the diskette. 

This input is sampled whenever a Write command Is 
received. A logic low terminates the command and 
sets the Write Protect status bit. 

The iput is sample d whe never a Write Track com- 
mand is received. If DINT=0, the operation is termin- 
ated and the Write Protect status bit is set. 
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ORGANIZATION 

T| The Floppy Disk Formatter block diagram is illustra- 

O ted on page 4. The primary sections include the 

«^j parallel processor interface and the Floppy Disk 

2 interface. 

O Data Shift Register This fi-bit register assembles se- 
■^ rial data from the Read Data input (FDDATA) durilng 
Read operations and transfers serial data to the 
Write Data output during Write operations. 

Data Register This 6-bit register is used as a holding 
register during Disk Read and .Write operations. In 
Disk Read operations the assembled data byte fs 
transferred in parallel to the Data Register from the 
Data Shift Register. In Disk Write operations infor- 
mation is transferred in parallel from the Data Regis- 
ter to the Data Shift Register 

When executing the Seek command^ the Data Regis- 
ter holds the address of the desired Track position. 
This register can be loaded from the DAL and gated 
onto the DAL under processor control 

Track Register This 8-bit register holds the track 
number of the current Read/Write head position, it is 
incremented by one every time the head is stepped in 
(towards track 76) and decremented by one when 
the head is stepped out (towards track 00), The con- 
tents of the register are compared with the recorded 
track number in the f D field during disk Read, Write, 
and Verify operations. The Track Register can be 



loaded from or transferred to the DAL. This Register 
should not be loaded when this device is busy. 

Sector Register (SR): This 6-bit register holds the 
address of the desired sector position. The contents 
of the register are compared with the recorded sec- 
tor number in the ID field during disk Read or Write 
operations. The Sector Register contents can be 
loaded from or transferred to the DAL. This register 
should not be loaded when the device is busy. 

Command Register (CR); This 6-bit register holds 
the command presently being executed. This regis- 
ter should not be loaded when the device is busy 
unless the execution of the current command is to be 
overridden. This latter action results in an interrupt. 
The command register can be loaded from the DAL, 
but not read onto the DAL. 

Status Register (STR): This 6-bit register holds 
device Status information. The meaning of the Sta- 
tus bits arc a function of the contents of the Com- 
mand Register. This register can be read onto the 
DAL, but not loaded from the DAL. 

CRC Logic: This logic is used to check or to generate 

the 16-bit Cyclic Redundancy Check (CRC). The 
polynomial is: G(x) = x'^ + x^^ + x* + 1. 

The CRC includes all information starting with the 
address mark and up to the ORG characters. The 
CRC register is preset to ones prior to data being 
shifted through the circuit. 



^ / (OAL I 

Hi 



DATA OUT 



COMMAND 

REG 



WRITE DATA 
(TO OrSKI 

_DRO 



h;i 



^— \ CRC LOGIC \ ^^ 



TRACK 



<] 



x^ 



i=fht 



STATUS 



DATA 
SEPA- 
RATOR 



FDDATA 



FD CL OCK 
XTOS 






MSE » 



AO 



CLK (g MHZ) ^ 



COMPUTER 
INTERFACE 
CONTROL 



^ CONTROL ^ 



TIMING AMD 
CONTROL 



^ CONTROL 



~ ^g^FHT 



DISK 

INTERFACE 

CONTROL 



WS fc. 



m^^^ 



m 



.mosL. 



READY 



Fhij^step- 



PHg^DJRf^ p 



^ PIHT 



PH3 r^ 

3Tm " 



^ HLT 



HLD ^ 
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Arithmetic/Logic Unit (ALU): The ALU is a serial 
comparator, incrementer, and decrementer and is 
used for register modification and comparisons with 
the disk recorded ID field. 

AM Detecton The Address Mark detector is used to 
detect ID, Data, and Index address marks during 
Read and Write operations. 
Timing and Control: All computer and Floppy Disk 
Interface controls are generated through this logic. 
The internal device timing is generated from a 2.0 
mHz external crystal clock. 
PROCESSOR INTERFACE 
The interface to the processor is accomplished 
through the eight Data Access Lines (DAL) and 
associated control signals. The DAL are used to 
transfer Data. Status, and Control words out of, or 
into the FD1 771 . The DAL are three-state buffers that 
are enabled as output drivers when Chip Select (CS) 
and Read Enable (RE) are active (low logic state) or 
act as input receivers when CS and Write Enable 
(WE) are active. 

When transfer of data with the Floppy Disk Con- 
troller is required by the host processor, the device 
address is decoded and CS is made low. The least- 
significant address bits A1 and AO, combined with 
the signals RE during a Read operation or WE during 
a Write operation are interpreted as selecting the fol- 
lowing registers: 



A1-A0 


READ (RE) 


WRITE (WE) 




1 

1 

1 1 


Status Register 
Track Register 
Sector Register 
Data Register 


Command Register 
Track Register 
Sector Register 
Data Register 



During Direct Memory Access (DMA) types of data 
transfers between the Data Register of the FD1771 
and the Processor, the Data Request (DRQ) output is 
used in Data Transfer control. This signal also 
appears as status bit 1 during Read and Write 
operations. 

On Disk Read operations the Data Request is acti- 
vated (set high) when an assembled serial input byte 
Is transferred in parallel to the Data Register. This bit 
is cleared when the Data Register is read by the pro- 
cessor. If the Data Register is read after one or more 
characters are lost, by having new data transferred 
into the register prior to processor readout, the Lost 
Data bit is set in the Status Register. The Read opera- 
tion continues until the end of sector is reached. 
On Disk Write operations the Data Request is acti- 
vated when the Data Register transfers its contents 
to the Data Shift Register, and requires a new data 
byte. It is reset when the Data Register is loaded with 
new data by the processor. If new data is not loaded 



at the time the next serial byte is required by the 
Floppy Disk, a byte of zeroes is written on the 
diskette and the Lost Data bit is set in the Status 
Register. 

The Lost Data bit and certain other bits in the Status 
'Register will activate the interrupt request (INTRO). 
The interrupt line is also activated with normal com- 
pletion or abnormal termination of all controller 
operations. The INTRO signal remains active until 
reset by reading the Status Register to the processor 
or by the loading of the Command Register. In addi- 
tion, the INTRO is generated if a Force Interrupt 
command condition is met. 

FLOPPY DISK INTERFACE 

The Floppy Disk interface consists of head position- 
ing controls, write gate controls, and data transfers. 
A 2.0 MHz ± 1% square wave clock is requred at the 
CLK input for internal control timing (may be 1.0 
MHz for mini floppy). 

HEAD POSITIONING 

Four commands cause positioning of the Read- 
Write head (see Command Section). The period of 
each positioning step is specified by the r field in bits 
1 and of the command word. After the last direc- 
tional step, an additional 10 milliseconds of head set- 
tling time takes place. The four programmable 
stepping rates are tabulated below. 
The rates (shown in Table 1) can be applied to a 
Three-Phase Motor or a Step-Direction Motor through 
the device interface. When the 3PM input is con- 
nected to ground, the device operates with a three- 
phase motor control interface, with one active low 
signal per phase on the three output signals PHI, 
PH2, and PH3. The stepping sequence, when step- 
ping in, is Phases 1-2-3-1, and when stepping out, 
Phases 1-3-2-1. Phase 1 is active low after Master 
Reset. Note: PH3 needs an Inverter If used. 
The Step-Direction M otor Control interface is acti- 
vated by leaving input 3PM open or connecting it to 
+5V. The Phase 1 pin PHI becomes a Step pulse of 4 
microseconds width. The Phase 2 pin PH2 becomes 
a direction control with a high voltage on this pin 
indicating a Step In. and a low voltage indicating a 
Step Out. The Direction output is valid a minimum of 
24 /iS prior to the activation of the Step pulse. 
When a Seek, Step or Restore command is executed, 
an optional verification of Read-Write head position 
can be performed by setting bit 2 in the command 
word to a logic 1 . The verification operation begins at 
the end of the 10 millisecond settling time after the 
head is loaded against the media. The track number 
from the first encountered ID Field is compared 
against the contents of the Track Register. If the 
track numbers compare and the ID Field Cyclic 
Redundancy Check (CRC) is correct, the verify 
operation is complete. If track comparison is not 
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made but the CRC checks, an interrupt is generated, 
the Seek Error status (Bit 4) is set and the Busy status 
bit is reset. 





Table 1. STEPPING RATES 




M ro 


1771-X1 
CLK = 2MHz 


1771-X1 
CLK=1MHz 


1771 or -XI 
CLK = 2MHz 


1771 or -XI 
CLK=1MHz 


TEST=1 


TEST=1 


TEST=0 


TEST = 


O 

1 

1 O 
1 1 


6ms 

6ms 

10ms 

20m8 


12ms 
12ms 
20ms 
4Qms 


Approx. 
400ms* 


Approx. 
800ms* 



* For exact times consult WDC. 

The Head Load (HLD) output controls the movement 
of the read/write head against the disk for; data 
recording or retrieval. It is activated at the beginriing 
of a Read. Write (E Flag On) or Verify operation, or a 
Seek or Step operation with the head load bit, h, a 
logic one remains activated until the third index 
pulse following the last operation which uses the 
read/write head. Reading or Writing does not occur 
until a minimum of 10 msec delay after the HLD sig- 
nal is made active. If executing the type 2 commands 
with the E flag off, there is no 10 msec delay and the 
head is assumed to be engaged. The delay is deter- 
mined by sampling of the Head Load Timing (HLT) 
input after 10 msec. A high state input, generated 
from the Head Load output transition and delayed 
externally, identifies engagement of the head 
against the disk. In the Seek and Step commands, 
the head is loaded at the start of the command exe- 
cution when the h bit is a logic one. In a verify com- 
mand the head is loaded after stepping to the 
destination track on the disk whenever the h bit is a 
logic zero. 

DISK READ OPERATION 

The 2.0 MHz external clock provided to the device is 
internally divided by 4 to form the 500 kHz clock rate 
for data transfer. When reading data from a diskette 
this divider is synchronized to transitions of the Read 
Data (FDDATA) input. When a transition does not 
occur on the 500 kHz clock active state, the clock 
divider circuit injects a clock to maintain a continu- 
ous 500 kHz data clock. The 500 kHz data clock is 
further divided by 2 internally to separate the clock 
and information bits. The divider is phased to the 
Information by the detection of the address mark. 

In the internal data read and separation mode the 
Read Data Input toggles from one state to the oppo- 
site state for each logic one bit of clock or informa- 
tion. This signal can be derived from the amplified, 
differentiated, and sliced Read Head signal, or by the 
output of a flip-flop toggling on the Read Data 
pulses. This input Is sampled by the 2 MHz clock to 
detect transitions. 

The chip can also operate on externally separated 



data, as supplied by methods such as Phase Lock 
loop. One Shots, or variable frequency oscillators. 
This is accom plished by grounding the External 
Data Separator (XTDS) INPUT. When the Read Data 
input makes a high-to-low transition, the informa- 
tion input to the FDDATA line is clocked into the 
Data Shift Register. The assembled 8-bit data from 
the Data Shift Register are then transferred to the 
Data Register. 

The normal sector length for read or Write opera- 
tions with the IBM 3740 format is 128 bytes. This for^ 
mat or binary multiples of 128 bytes will be adopted 
by setting a logic 1 in Bit 3 of the Read and Write 
commands. Additionally, a variable sector length 
feature Is provided which allows an indicator recorded 
In the ID Field to control the length of the sector. Vari- 
able sector lengths can be read or written in Read or 
Write commands, respectively, by setting a logic in 
Bit 3 of the command word. The sector length Indica- 
tor specifies the number of 16 byte groups or 16 x N. 
where N is equal to 1 to 256 groups. An indicator ofall 
zeroes is interpreted as 256 sixteen byte groups. 

DISK WRITE OPERATION 

After data is loaded from the processor into the Data 
Register, and is transferred to the Data Shift Register, 
data will be shifted serially through the Write Data 
(WD) output. Interlaced with eachbit of data is a pos- 
itive clock pulse of 0.5 Msec duration. This signal 
may be used to externally toggle a flip-flop to control 
the direction of Write Current flow. 

When writing is to take place on the diskette the 
Write Gate (WG) output is activated, allowing cur- 
rent to flow into the Read/Write head. As a precau- 
tion to erroneous writing, the first data byte must be 
loaded into the Data Register in response to a Data 
Request from the FD1771 before the Write Gate sig- 
nal can be activated. 

Writing is Inhibited when the Write Protect input is a 
logic low, in which case any Write command is 
immediately terminated, an interrupt is generated 
and the Write Protect status bit is set. The Write Fault 
Input, when activated, signifies a writing fault condi- 
tion detected in disk drive electronics such as failure 
to detect write current flow when the Write Gate is 
activated. On detection of this fault the FD1771 ter- 
minates the current command, and set s the Write 
fault bit (bit 5) In the Status Word. The Write Fault 
input should be made inactive when the Write Gate 
output becomes inactive. 

Whenever a Read or Write command is received the 
FD1771 samples the READY input. If this Input is 
logic low the command Is not executed and an inter- 
rupt is generated. The Seek or Step commands are 
performed regardless of the state of the READY 
input. J 
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COMMAND DESCRIPTION 

The FD1 771 will accept and execute eleven com- 
mands. Command words should only be loaded jn 
the Command Register when the Busy status bit is 
off (status bit 0). The one exception is the Force 
Interrupt command. Whenever a command is being 
executed, the Busy status bit is set. When a com- 
mand is completed, an interrupt is generated and the 
Busy status bit is reset. The Status Register indicates 
whether the completed command encountered an 
error or was fault-free. For ease of discussion, com- 
mands are divided into four types. Commands and 
types are summarized in Table 2, 

TYPE 1 COMMANDS 

The Type 1 Commands include the RESTORE, 
SEEK. STEP. STEP-IN, and STEP-OUT commands. 
Each of the Type 1 Commands contain a rate field 
(rofi ). which determines the stepping motor rate as 
defined in Table 1, page 4. 

The Type 1 Commands contain a head load flag (h) 
which determines if the head is to be loaded at the 
beginning of the command, lfh-1, the head is 
loaded at the beginning of the command (HLD 
output is made active). If h=0, HLD is deactivated. 





Table 2. COMMAND SUMMARY 






BITS 


TYPE 


COMMAND 


7 6 5 4 3 2 10 




Restore 


h V ri ro 




Seek 


1 h V ri ro 




Step 


1 u h V ri ro 




Step In 


1 u h V ri ro 




Step Out 


1 1 u h V ri ro 


It 


Read Command 


1 m b E 


ti 


Write Command 


1 1 m b E ai ao 


iti 


Read Address 


1 1 E 


til 


Read Track 


1110 10s 


til 


Write Track 


11110 10 


IV 


Force Interrupt 


1 1 1 13 l2 il U 



Note: Bits shown in TRUE form. 

Table 3. FLAG SUMMARY 



TYPE! 



h = Head Load flag |Bit 3) 
h= 1, Load+iead at beginning 
h = 0, Do not load head at beginning 

V ^ Verify flag (Bit 2) > 

V = 1, Verlfyonlasttrack 

V = 0, No verify 

rirp = Stepping motor rate (Bits 1-0) 
Refer to Table 1 for rate summary 

u = Update flag (Bit 4) 

u = 1, Update Track register 

u = 0, No update 



Table 4. FLAG SUMMARY 



TYPE II 



m = Multiple Record flag (Bit 4) 

m = 0, Single Record 
m ^ 1, Multiple Records 

b = Block length flag (Bit 3) 

b = 1 JBM format (128 to 1024 bytes) 
b = 0| Non-IBM format 
{16to4096 bytes) 

atap = Data Address Mark (Bits 1-0) 
aiao = 00, FB (Data Mark) 
aiao = 01, FA (User defined) 
aiao = 10, F9 (User defined) 
aiao = 11, F8 (Deleted Data Mark) 



Table 5. FLAG SUMMARY 



TYPE III 



s = Synchronize (lag (Bit Q) 

s = 0^ Synchronize to AM 

s = 1, Do Not Synchronize to AM 



TYPE IV 



11 = Interrupt Condition flags (Bits 3-0) 

10 = 1, Not Ready to Ready Transition 

11 = 1, ReadytoNot Ready Transition 

12 = 1, Index Pulse 

13 = 1, Immediate interrupt ' 

E = Enable HLD and 10 msec Delay 

E = 1, Enable HLD, HLT and 10 msec 

Delay 
E = 0, Head Is assumed Engaged and 

there is no 10 msec Delay 



Once the head is loaded, the head will remain 
engaged until the FD1771 receives a command that 
specifically disengages the head. H the FD1771 
does not receive any commands after two 
revolutions of the disk, the head will be auto- 
matically disengaged (HLD made inactive). The 
Head Load Timing Input is sampled after a 10 ms 
delay, when reading or writing on the disk is to 
occur. 

The Type 1 Commands also contain a verification 
(V) flag which determines if a verification operation 
is to take place on the destination track. If V=1 , a veri- 
fication is performed; if V=0, no verification is 
performed. 

During verification, the head is loaded and after an 
internal 10 ms delay, the HLT input is sampled. When 
HLT is active (logic true), the first encountered ID 
field is read off the disk. The track address of the ID 
Field is then compared to the Track Register; if there 
is a match and a valid ID CRC. the verification is 
complete, an interrupt fs generated and the BUSY 
status bit is reset. If there is not a match but there is 

3 
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valid. ID CRC, an ihterirupt is generated, the Seek 
-H Error status bit (Status Bit 4) is set and the BUSY sta- 
O tus bit is reset. If there is a match but not a valid GRG, 
^ the CRC error status bit is set (Status Bit 3), and the 
•g next encountered ID Field is read from the disk for the 
^ verification operation. If an ID Field v^ith a valid CRC 
^ cannot be found after two revolutions ofthe disk, the 
FD1771 terminates the operation and sents an inter- 
rupt (INTRQ). 

The STEP. STEP-IN. and STEP-OUT commands 
contain an Update flag (U). When U=1, the track 
register is updated by one for each step. Whe U=0, 
the track register is not updated. 

RESTORE (SEEK TRACK 0) 

Upon receipt of thi s com mand the Track 00 (TR05) 
input is sampled. If TROO is active low indicating the 
Read-Write head is positioned over track 0, the Track 






yes 




SET 
DIRECTION 














^ YES 


RESET 
DIRECTION 








^YES 




> 









{FF)H TO Tfl 




[^ 6 



TYPE I COMMAND FLOW 



Register is l oaded with zeroes and an interrupt is 
generated. If TROO is not active low, stepping pulses 
(pins 15 to 17) a t a rat e specified by the r^ ro field are 
issued until the TROO input is activated. At this time 
the TR Is loa ded w ith zeroes and an interrupt Is gen- 
' erated. If the TROO input does not go active low after 
255 stepping pulses, the FD1771 terminates opera- 
tion, interrupts, and sets the Seek error status bit. 
Note that the RESTORE command is executed when 
MR goes from an active to an inactive state. A verifi- 
cation operation takes place if the V flag 1$ set. The h 
bit allows the head to be loaded at the start of 
command. 

SEEK 

This command assumes that the Track Register con- 
tains the track number of the current position ofthe 
Read-Write head and the Data Register contains the 
desired track number. The FD1771 wilt update the 



^ 



^ 




SET DIRECTION 



DELAY ACCORDING 
TO Rl. RO FIELD 
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Track register and issue stepping pulses in the 
appropriate direction until the contents of the Track 
register are equal to the contents of the data register 
(the desired track location). A verification operation 
takes place if the V flag is on. The h bit allows the 
head to be loaded at the start of the command. An 
interrupt is generated at the completion of the 
command. 

STEP 

Upon receipt of this command, the FD1771 issues 
one stepping pulse to the disk drive. The stepping 
motor direction is the same as in the previous step 
command. After a delay determined by the ri r o^ield, 
a verification takes place if the V flag is on. If the u 
flag is on, the TR Is updated. The h bit allows the 
head to be loaded at the start of the command. An 




INTRO. RESET BUSY 



^ 




INTRO. RESET BUSY 
SET SEEK ERROR 



D 



SET 
CRC 
ERROR 


YES . 


< THERE A 
CRC ERROR 




INTRO 
RESET BUSY 



)/lNTRQ. RESET BUSvN 
V SET SEEK ERROR 7 



NOTE !f tIST !} THESE ISNCJIOMEDEIAY 

IF TEST lANOCLK 1 MH/ THERE IS A 20MS DELAY 



TYPE I COMMAND FLOW 



Interrupt is generated at the completion of the 
command. 

STEr-iN 

Upon receipt of this command, the FD1771 issues 
one stepping pulse in the direction towards track 
76.' If the u flag Is on, the Track Register is incre- 
mented by one. After a delay determined by the ri r o 
field, a verification takes place if the V flag is on. The 
h bit allows the head to be loaded at the start of the 
command. An interrupt is generated at the comple- 
tion of the command. 

STEP-OUT 

Upon receipt of this command, the FD1771 issues 
one stepping pulse in the direction towards track 0. If 
the u flag Is on, the TR Is decremented by one. After a 
delay determined by the riro field, a verification 
takes place if the V flag is on. The h bit allows the 
head to be loaded at the start of the command. An 
interrupt is generated at the completion of the 
command. 

TYPE II COMMANDS 

The Type II Commands include the Read Sector(s) 
and Write Sector(s) commands. Prior to loading the 
Type II command into the COMMAND REGISTER, 
the computer must load the Sector Register with the 
desired sector number. Upon receipt of the Type II 
command, the Busy status bit is set. If the E flag=1 
(this Is the normal case). KLD is made active and 
HLT is sampled after a 10 msec delay. If the E flag is 
0. the head is assumed to be engaged and there is no 
10 msec delay. The ID field and the Data Field format 
are shown below. 

When an ID field is located on the disk, the FD1771 
compares the track number of the ID field with the 
Track Register. If there is not a match, the next 
encountered ID field is read and a comparison is 
again made. If there was a match, the Sector Number 
of the ID field is compared with the Sector Register. 
If there is not a Sector match, the next encountered 
ID field is read off the disk and comparisons again 
made. If the ID field CRC is correct, the data field is 
then located and will be either written into, or read 
from depending on the command. The FD1771 must 
find an ID field with a track number, Sector number, 
and CRC within two revolutions of the disk; other- 
wise, the Record Not Found status bit is set (Status 
bit 3) and the command is terminated with an 
interrupt. 

Each of the Type II Commands contain a (b) flag 
which in conjunction with the sector length field 
contents of the ID determines the length (number of 
characters) of the Data field. 

For IBM 3740 compatibility, the b flag should equal 1 . 
The numbers of bytes in the data field (sector) is then 
128x2n wheren = 0. 1.2, 3. 



■n 

C3 
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■"■ 


***^ 


GAP 


ID 
AM 


TRACK 
NUMBER 


ZERO 


SECTOR 
NUMBER 


SECTOR 
LENGTH 


CRC 

1 


CRC 
2 


GAP 


DATA 
AM 


DATA FIELD 


CRC 

1 


CRC 
2 


ID FIELD 


DATA FIELD 







^ IDAM = ID Address Mark — DATA = (FE)i6 CLK = (C7)i6 

-1 Data AM = Data Address Mark — DATA = (F8, F9, FA, or FB), CLW'= (C7)i6 



For b = 1 



Sector Length 
Field (Hex) 


Number of Bytes 
in Sector (Decimal) 


00 
01 
02 
03 


128 

256 

512 

1024 



When the b flag equals zero, the sector length field 
(n) multiplied by 16 determines the number of bytes 
in the sector or data field as shown below. 

For b = 



Sector Length 
Field (Hex) 


Number of Bytes 
in Sector (Decimal) 


01 
02 
03 
04 

• 


16 
32 
48 
64 

• 


9 


9 


• 


• 


FF 
00 


4080 
4096 



Each of the Type tl commands also contain a (m) flag 
which determines if the multiple records (sectors) 
are to be read or written, depending upon the com- 
mand. If m=0 a single sector is read or written and an 
interrupt is generated at the completion of the com- 
mand. If m=1, multiple records are read or written 
with the sector register internally updated so that an 
address verification can occur on the next record. 
The FD1771 will continue to read or write multiple 
records and update the sector register until the sec- 
tor register exceeds the number of sectors on the 
track or until the Force Interrupt command is loaded 
into the command register, which terminated the 
command and generates an interrupt. 

READ COMMAND 

Upon receipt of the Read command, the head is 
loaded, the BUSY status bit set, and when an ID field 
is encountered that has the correct track number, 
correct sector number, and correct CRC, the data 
field is presented to the computer. The Data Address 
Mark of the data field must be found within 28 bytes 
of the correct field; if not, the Record Not Found sta- 
tus bit is set and the operation is terminated. When 
the first character or byte of the data field has been 




sEt busy reset dro. lost 
data. record not found. a 

STATUS BITS 5 4 6 irilTRO 




NOTE IF TEST 
rF TEST 



THERE IS NO 10 MS DEL AY 

1 AND CLK 1 MH/ THERE IS A ?OMS DELAY 



TYPE II COMMAND FLOW 

shifted through the DSR. it is transferred to the DR, 
and DRQ is generated. When the next byte is accum- 
ulated in the DSR, it is transferred to the DR and 
another DRQ is generated. If the computer has not 
read the previous contents of the DR before a new 
character is transferred that character is lost and the 
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INTRO. RESET BUSY 
MT RECORD-NOT FOUNDJ 



^£J 



BRING IN SECTOR LENGTH f lELO 

COMPUTE LENGTH FROM b FLAG 

STORE LENGTH IN INTERNAL 

REGISTER 



SETCRC 
STATUS ERROR 




RESET 
CflC 








D 



PUT RECORD TYPE IN 
STATUS REG BITS 4 4 5 




"n 
o 



c 



3 



QC 



INTRO RESET BUSY 



9 
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TYPE II COMMAND FLOW 



Lost Data status bit is set. This sequence continues 
until the conriplete data field has been input to the 
computer. If there is a ORG error at the end of the 
data field, the CRC error status bit is set. and the 
command is terminated (even if it is a mulltiple 
record command). 

At the end of the Read operation, the type of Data 
Address Mark encountered in the data field is recor- 
ded in the Status Register (Bits 5 and 6) as shown 
below. 



status 
Bite 


status 
Bits 


Data AIM 
(Hex) 





1 
1 



1 


1 


FB 
FA 
F9 
F8 



WRITE COMMAND 

Upon receipt of the Write command, the head is 
loaded (HLD active) and the BUSY status bit is set. 
When an ID field is encountered that has the correct 
track number, correct sector number, and correct 
CRC, a DRQ is generated. The FD1771 counts off 1 1 
bytes from the CRC field and the Write Gate (WG) 
output Is made active If the DRQ Is serviced (I.e., the 
DR has been loaded by the computer). If DRQ has 
not been serviced, the command Is terminated and 
the Lost Data status bit Is set. If the DRQ has been ser- 
viced, the WG is made active and six bytes of zeros 
are then written on the disk. At this time the Data 
Address Mark is then written on the disk as deter- 
mined by the ai ao field of the command as shown 
on next page. 

The FD1 771 then writes the data field and generates 
DRQs to the computer. If the DRQ is not serviced in 
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ai 


ao 


Data Mark 
(Hex) 


Clock Mark 
(Hex) 




1 
1 



1 


1 


FB 
FA 
F9 
F8 


C7 
C7 
C7 
C7 



time for continuous writing the Lost Data status bit is 
set and a byte of zeros is written on the disk. The 
command is not terminated. After the last data byte 
has been written on the disk, the two-byte CRC is 
computed internally and written on the disk followed 
by one byte gap of logic ones. The WG output is then 
deactivated. 





^ 




DELAY .2 BYTES OF GAP 




♦ 




SET DRQ 



DELAY a BYTES OF GAP 




^y INTRO. RESET BUSY^ 
V SET LOST DATA J 



DELAY 1 BYTE OF GAP 



TURN ON WG & WRITE 
6 BYTES OF ZEROS 



WRITE DATA AM 
ACCORDING TO Al, AO FIELD 
OF WRITE COMMAND 



On TO CSn. SET uRu 



WRITE BYTE TO DISK 




SET DATA 

LOST 

WRITE BYTE 

OF ZEROS 



"^HAVE ^ 
NO ^ ALL BYTES X,^ YES 
.BEEN WRITTEN 



WRITE CRC 

~~r~ 



WRITE 1 BYTE OF ONES 



^ 
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ryPE III COMMANDS 
READ Address 



Upon receipt of the Read Address command, the 
head is loaded and the BUSY Status bit is set. The 
next encountered ID field is then read in from the 
disk, and the six data bytes of the ID field are 
assembled aod transferred to the DR, and a DRQ is 
generated for each byte. The six bytes of the ID field 
are shown below. 



TRACK 
ADDR 


SIDE 
NUMBER 


SECTOR 
ADDRESS 


SECTOR 
LENGTH 


CRC 

1 


CRC 
2 


1 


2 


3 


4 


5 


6 



Although the CRC characters are transferred to the 
computer, the FD1771 checks for validity and the 
CRC error status bit is set If there is a CRC error. 
The Sector Address of the ID field is written into the 
Sector Register. At the end of the operation an inter- 
rupt is generated and the BUSY Status is reset. 

READ TRACK 

Upon receipt of the Read Track command, the head 
is loaded and the BUSY status bit is set. Reading 
starts with the leading edge of the first encountered 
index mark and continues until the, next index pulse. 
As each byte is assembled it is transferred to the 
Data Register and the Data Request is generated for 
each byte. No CRC checking is performed. Gaps are 
included in the input data stream. If bit 0(S) of the 
command is a 0, the accumulation of bytes is syn- 
chronized to each Address Mark encountered. Upon 
completion of the command, the interrupt is 
activated. 

WRITE TRACK 

Upon receipt of the Write Track command, the head 
is loaded and the BUSY status bit is set. Writing 
starts with the leading edge of the first encountered 
index pulse and continues until the next index pulse, 
at which time the interrupt is activated. The Data 
Request is activated immediately upon receiving the 
command, but writing will not start until afterthe first 
byte has been loaded into the Data Register. If the 
DR has not been loaded by the time the index pulse is 
encountered the operation is terminated making the 
device Not Busy, the Lost Data status bit is set. and 
the Interrupt is activated. If a byte is not present in 
the DR when needed, a byte of zeros is substituted. 
Address Marks and CRC characters are written on 
the disk by detecting certain data byte patterns in the 
outgoing data stream as shown In the table below. 
The CRC generator is initialized when any data byte 
from F8 to FE is about to be transferred from the DR 
to the DSR. 
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SET BUSY. RESET DRQ. 

LOST DATA. STATUS 

BITS 4. S. & 6 



INTRO 
RESET BUSY 



c 




iNTRO RESET 
BUSY SET WPHT 



TYPE III COMMAND WRITE TRACK 



CONTROL BYTES FOR INITIALIZATION 



DATA 




CLOCK 


PATTERN 




MARK 


(HEX) 


INTERPRETATION 


(HEX) 


F7 


Write CRC Character 


FF 


F8 


Data Address Mark 


C7 


F9 


Data Address Mark 


C7 


FA 


Data Address Mark 


C7 


FB 


Data Address Mark 


07 


FC 


Index Address Mark 


D7 


FD 


Spare 




FE 


ID Address Mark 


C7 







TYPE III COMMAND WRITE TRACK 

The Write Track Command will not execute if the 
DINT input is grounded; Instead, the Write Protect 
status bit is set and the interrupt is activated. Note 
that one FT pattern generates two CRC characters. 

TYPE IV COMMAND 

Force Interrupt 

This command can be loaded Into the command reg- 
ister at any time. If there is a current command under 
execution (BUSY status bit set), the command will 
be terminated and\an Interrupt will be generated 
when the condition specified in the Iq through I3 
field Is detected. The interrupt conditions are shown 
below: 

lo= Not-Ready-To-Ready Transition 

1^ = Ready-To-Not-Ready Transition 

l2= Every Index Pulse 

13= Immediate Interrupt (Requires reset, 
see Note) ^ 

NOTE: If Iq - 13 = 0, there is no interrupt gerierated but the current 
command is terminated and busy is reset. This is the only 
command that will clear the immediate interrupt. 
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STATUS DESCRIPTION 



Upon receipt of any command, except the Force 
Interrupt command, the Busy Status bit is set and 
the rest of the status bits are updated or cleared for 
the nev^ command. If the Force Interrupt Command 
is received when there Is a current command under 
execution, the Busy status bit is reset, and the rest of 
the status bitsare unchanged. If the Force Interrupt 
command is received when there is not a current 
command under execution, the Busy Status bit is 



reset and the rest ot the status bits are updated or 
cleared. In this case. Status reflects the Type I 
commands. 

The format of the Status Register is shown below. 



(BITS) 


7 


6 


5 


4 


3 


2 


1 





S7 


S6 


S5 


S4 


S3 


S2 


S1 


SO 



Status varies according to the type of command 
executed as shown in Table 6. 



' 




Table 6, STATUS REGISTER SUMMARY 






ALL TYPE 1 












BIT 


COMMANDS 


READ ADDRESS 


READ 


READ TRACK 


WRITE 


WRITE TRACK 


S7 


NOT READY 


NOT READY 


NOT READY 


NOT READY 


NOT READY 


NOT READY 


S6 


WRITE PROTECT 





RECORD TYPE 





WRITE PROTECT 


WRITE PROTECT 


S5 


HEAD ENGAGED 





RECORD TYPE 





WRITE FAULT 


WRITE FAULT 


S4 


SEEK ERROR 


ID NOT FOUND 


RECORD NOT 
FOUND 





RECORD NOT 
FOUND 





S3 


ORG ERROR 


CRC ERROR 


CRC ERROR 





CRC ERROR 





S2 


TRACK 


LOST DATA 


LOST DATA 


LOST DATA 


LOST DATA 


LOST DATA 


SI 


INDEX 


DRQ 


DRQ 


DRQ 


DRQ 


DRQ 


SO 


BUSY 


BUSY 


BUSY 


BUSY 


BUSY 


BUSY 



STATUS FOR TYPE I COMMANDS 



BIT 



S7 

S6 
S5 
S4 
S3 

S2 
S1 



NAME 



NOT READY 

PROTECTED 
HEAD LOADED 
SEEK ERROR 
CRC ERROR 

TRACK 00 
INDEX 



SO BUSY 



MEANING 



This bit when set indicates the drive is not ready. When reset it 
indicates that the drive is ready. This bit Is an inverted copy of 
the READY input and logically "ored" with MR. 

When set, indic ates W rite Protect is activated. This bit is an 
inverted copy of WRPT input. 

When set, it indicates the head is loaded and engaged. This bit 
is a logical "and" of HLD and HLT signals. 

When set, the desired track was not verified. This bit is reset to 
when updated. 

When set, there was one or more CRC errors encountered on 
an unsuccessful track verification operation. This bit is reset 
too when updated. 

When set, indicates Read-Write head is positioned to Track 0. 
This bit is an inverted copy of the TROO input. 

When set, indicates index mark detected from drive. This bit is 
an inverted copy of the IP input. 

When set, command is in progress. When reset, no command 
is in progress. 
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STATUS BITS FOR TYPE 11 AND Ml COMMANDS 



BIT 



S7 

S6 

S5 

S4 
S3 
82 
S1 

SO 



NAME 



NOT READY 



RECORD TYPE/ 
WRITE PROTECT 



RECORD TYPE/WRITE FAULT 

RECORD NOT FOUND 
CRC ERROR 
LOST DATA 
DATA REQUEST 

BUSY 



MEANING 



This bit when set indicates tine drive is not ready. When reset, it 
indicates that the drive is ready. This bit is an inverted copy of 
the READY inpyt and "ored" with MR, The TYPE 11 and III 
Comnr>ands will not execute unless the drive Is ready. 

On Read Record: It indicates the MSB of record-type code from 

data field address mark On Read Track: Not Used. On any 

Write Track: It indicates a Write Protect. This bit is reset whan 

updated. 

On Read Record: It indicates the LSB of record-type code from 

data field address mark. On Read Track: Not Used. On any 

Write Track: It indicates a Write Fault. This bit is reset when 

updated. 

When set, it indicates that the desired track and sector were 

not found. This bit is reset when updated. 

if S4 is set, an error is found in one or more ID fields; otherwise 

it indicates error in data f ieid. This bit is reset when updated. 

When set, it indicates the computer did not respond to DRQ in 

one byte time. This bit is reset to zero when updated. 

This bit is a copy of the DRQ output. When set, it indicates the 

DR is full on a Ready operation or the DR is empty on a Write 

operation. This bit is reset to zero when updated. 

When set, command is under execution. When reset, no 

command is under execution, ^_^ 






FORMATTING THE DISK {Refer to section on Type 
III Commands for flow diagrams.) 

Formatting the disk is a relatively simple task when 
operating programmed I/O or when operating under 
DMA control with a large amount of memory. When 
operating under DMA with limited amount of 
memory, formatting is a more difficult task. This is 
because gaps as well as data must be provided at the- 
computer interface. 

Formatting the disk is accomplished by positioning 
the R/W head over the desired track number and 
issuing the Write Track command. Upon receipt of 
the Write Track command, the FD1771 raises the 
Data Request signal. At this point in time, the user 
loads the Data Register with desired data to be writ- 
ten on the disk. For every byte of information to be 
written on the disk, a Data Request is generated. This 
sequence continues from one index mark to the next 
index mark. Normally, whatever data pattern 
appears in the Data Register is written on the disk 
with a clock mark of (FF)i6- However, if the FD1771 
detects a data pattern on F7 through FE in the Data 
Register, this is interpreted as data address marks 
with missing clocks or CRC generation. For 



instance, an FE pattern will be interpreted as an ID 
address mark (DATA-FE. CLK-C7) and the CRC will 
be initialized. An F7 pattern will generate two CRC 
characters. As a consequence, the patterns F7 
through FE must not appear in the gaps, data fields, 
or ID fields. Also, CRCs must be generated by an F7 
pattern. 

Disks may be formatted in IBM 3740 formats with sec- 
tor lengths of 128,256,512, or 1024 bytes, or may be 
formatted in non-IBM format with sector lengths of 1 6 
to 4096 bytes in 16-byte increments- IBM 3740 at the 
present time only defines two formats. One format 
with 128 bytes/sector and the other with 256 bytes- 
/sector The next section deals with the IBM 3740 for- 
mat with 128 bytes/sector followed by a section of 
non-IBM formats. 

IBM 3740 Formats — 128 Bytes/Sector 

The IBM format with 128 bytes/sector is depicted in 
the Track Format figure on the following page. In 
order to create this format, the user must issue the 
Write Track command, and load the data register with 
the following values. For every byte to be written, 
there is one data request. 
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Number 


Hex Value of 


-71 


of Bytes 


Byte Written 




40 

6 

1 

* 26 


00 or FF 

00 

FC (Index Mark) 

00 or FF 


o 


6 


00 




1 

1 
1 


FE (ID Address Mark) 
Track Number (0 through 4C) 
00 




1 
1 


Sector Number (1 through 1A) 
00 




1 
11 


F7 (two CRCs written) 
00 or FF 




6 


00 




1 

128 

1 

27 


FB (Data Address Mark) 
Data (IBM uses E5) 
F7 (two CRCs written) 
00 or FF 




247" 


00 or FF 



*Write bracketed field 26 times. 
•Continue writing until FD1771 interrupts out. 
Approximately 247 bytes. 



Non-IBM Formats 

Non=!BM formats are very similar to the IBM formats 
except a different algorithm is used to ascertain the 
sector length from the sector length byte in the ID 
field. This permits a wide range of sector lengths 
from 16 to 4096 bytes. Refer to Section V, Type tl 
commands with b flag equal to zero. Note that F7 
through FE must not appear in the sector length byte 
of the ID field. 

In formatting the FD1771, only two requirements 
regarding GAP sizes must be met. GAP 2 (i.e., the 
gap between the ID field and data field) must be 17 
bytes of which the last 6 bytes must be zero and that 
every address mark be preceded by at least one byte 
of zeros. However, it is recommended that every 
GAP be at least 17 bytes long with 6 bytes of zeros. 
The FD1771 does not require the index address mark 
(i.e., DATA = FC, CLK = D7) and need not be present. 

References: 

1) IBM Diskette OEM Information GA21-9190-1. 

2) SA900 IBM Compatibility Reference Manual — 
Shugart Associates. 
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DATA 
FIELD 

RECORD 



GAP 4 
PflE-INDEX 
320 BYTES 
NOMINAL 



- INDEX ADDRESS MARK 



GAP 3 
DATA 
GAP 



98o 



DATA FIELD 

RECORD 

NO 2 



DATA FIELD 

RECORD 

NO 3 




<-<• 



DATA FtELD 
RECORD 
NO 26 




DATA OR 
DELETED 

DATA 

ADDRESS 

MARK 



GAP 2 
00 OR FF ! 



J 



GAP 3 

OO OR FF 



V. 



TRACK FORMAT 
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ELECTRICAL CHARACTERISTICS 

Maxium Ratings 

VoD ^'fh respect to Vbb (Ground) *20 to -0.3V 
Max Voltage to any fnput witti *20 to -0.3V 

respect to Vbb 
Operating Temperature C'C to 70*^0 

Storage Temperature -55'' C to *125^C 



OPERATING CHARACTERISTICS (DC) 

Ta ^ O^C to 70*C, Vdo ' ^12 OV t .6V. 
Vbb ' -5-0 t .5V. Vss = OV. VCC ^ *5V * .25V 
I DO ' ^^ ^^ Nonriinal, \qq ■ 30 ma Nominai. 
''BB ■ ^^ ^^ Nominal 



Q 



Symbol 


Characteristic 


Min. 


Typ. 


Max. 


Units 


Conditions 


III 


Ir^put Leakage 






10 


^A 


V|N ^ Vdd 


«LO 


Output Leakage 






10 


iiA 


VoUT = VdD 


VlH 


Input High Voltage 


2.6 






V 




V|L 


Input Low Voltage (All Inputs) 






0.8 


V 




VOH 


Output High Voltage 


2.8 






V 


lO = -100 uA 


Vol 


Output Low Voltage 






0.45 


V 


10 = TO mA 



TIMING CHARACTERISTICS 



TA ^ O^CtoTO^C. V, 



'BB 



-5V :t ,25V. V 



DD 



*12V i ,6V, 



SS 



OV. V 



CC 



*5V - .25V 



NOTE: Timings are given for 2 MHz Clock. For those 
timings noted, values will double when chip is oper- 
ated at 1 MHz. Use 1 MHz when using mini-floppy. 



Read Operations 












Symbol 


Characteristic 


Min, 


Typ. 


Max. 


Units 


Conditions 


TSET 


Setup AOOR and CS to RE 


100 






nsec 




THLD 


Hold ADDR and CS from RE 


10 






nsec 


> 


TRE 


RE Pulse Width 


450 






nsec 


Cl = 25 pJ 


TDRR 


DRQ Reset from RE 






750 


nsec 




TIRR 


INTRO Reset from RE 






3000 


nsec 




TDACC 


Data Access from RE 






450 


nsec 


Cl = 25 pf 


TDOH 


Data Hold from RE 


50 




150 


nsec 

1 


Cl = 25 pf 



Write Operations 



Symbol 


Characteristic 


Min. 


Typ. 


Max. 


Units 


Conditions 


TSET 


Setup ADDR and CS to WE 


100 






nsec 




THLD 


Hold ADDR and CS from WE 


10 






nsec 




TWE 


WE Pulse Width 


450 


300 




nsec 




TDRR 


DRQReseHromWE 






750 


nsec 




TIRR 


INTRO Reset from WE 






3000 


nsec 


See Note 


TDS 


Data Setup to WE 


350 






nsec 




TDH 


Data Hold from WE 


150 






nsec 





Exiernal Data Separation (XTPS = 0) 












Symbol 


Characleristic 


Min. 


Typ, 


Max. 


Units 


Conditions 


TPWX 


Pulse Width Read Data & Read Ciock 


150 




350 


nsec 




TCX 


Clock Cycle External 


2500 






nsec 




TDEX 


Data to Clock 


600 






nsec 




TDDX 


Data to Data Cycle 


2500 






nsec 
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j 2" 


1*) ""* 


LJ^^DRR 




^<; j*uo 




DROVOL 1 

1 
1 


"1 














" 






^MLD- 


u 












1 
A0.A1.CS 

HE 




1 »e-H 


1 








^ET 














1 


1 




DATA VALID (BaL) 
READ DATA 
(BUFFERS THl-STATE 


1 


^ OACC 1 


DOH 







1. 5S MAY BE PERMANENTLY TIED LOW IF DESIRED 

2 FOR HEAD TRACK COMMAND. THIS TIME MAY BE 12- TO 3!- (iSEC WHEN S = 

3' tMfvtca WORST CASE76^SEC. 

•TIME DOUBLES WHEN CLK ■ 1 MHZ 



K: 



AO.Al.CS' ■ 



k- 



K 



1 CS MAY BE PERMANENTLY TIED LOW IF DESIRED 

2 WHEN WRITING DATA INTO THIS SECTOR. TRACK. OR DATA REGISTER USER CANNOT 

READ THIS REGISTER UNTIL AT LEAST 8 MSEC AFTER THE RISING EDGE OF OTwhTn 
WRITING INTO THE COMMAND REGISTER STATUS PS NOT VAL UNtFl SOMrSOusIc 
LATER THESE TIMES ARE DOUBLED WHEN CLK 1 MHZ *"- " "^^ ' "■ ^""^ ?0f SEC 

3 ■Mrvtca WORST CASE 34 flSEC 

• ' TIME DOUBLES WHEN CLK 1 MHZ 



READ ENABLE TIMING 



WRITE ENABLE TIMING 



SEPARATION 




NOTE 

1 ABOVE TIMES ARE DOUBLED WHEN CLK i uh7 

2 CONTACT WDC FOR EXTERNAL CLOCK DATA SEPARATOR CIRCUITS 

3 FDCLK AND FDOATAMAY BE REVERSED F017T1 DECIDES WHAT IS CLOCK AND WHAT IS DATA 



Internal Data Separation (XTDS = 1) 



READ TIMING (XTDS = 0) 



Symbol 


Characteristic 


MIn. 


Typ. 


Max. 


Units 


Conditions 


TPWI 
TCI 


Pulse Width Data and Clock 
Clock Cycle Internal 


150 
3500 




1000 
5000 


nsec 
nsec 





Write Data Timing 



Symbol 


Characteristic 


Min. 


Typ. 


Max. 


Units 


Conditions 


TWGD 
TPWW 
TCDW 
TCW 
TWGH 


Write Gate to Data 
Pulse Width Write Data 
Clock to Data 
Clock Cycle Write 
Write Gate Hold to Data 


500 



1200 

2000 
4000 


600 
100 


nsec 
nsec 
nsec 
nsec 
nsec 


300 nsec ± CLK tolerance 

± CLK tolerance 
± CLK tolerance 



Miscellaneous Timing 



Symbol 


Characteristic 


IMin. 


Typ. 


Max. 


Units 


Conditions 


TCDi 


Clock Duty 


175 






nsec 


2MHz± 1% See Note 


TCD2 


Clock Duty 


210 






nsec 




TSTP 


Step Pulse Output 


3800 




4200 


nsec 


N 


TDIR 


Direct Setup to Step 


24 






nsec 




TMR 


Master Reset Pulse Width 


10 






nsec 


>These times doubled 


TIP 


Index Pulse Width 


10 






nsec 


when CLK = 1 MHz 


TWF 


Write Fault Pulse Width 


10 






nsec 


J 
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XTDS I 
INTERNAL DATA 

SEPAHATioM tnr,' nc<^ 

MUST BE riFnttlUt. 



_Fl_ 



m R m 



-Vh 



LEADING EDGE OF 
DATA PULSE 
MUST OCCUR IN 
SHADED AREA 




NOTE 

INTERNAL DATA SEPARATION MAY WORK fOfl SOME APPLICATIONS HOWEVFfi 

FOR APPLICATIONS REQUIRING HIGH DATA RECOVERV RELIABILITY 

WDC RECOMMENOS EXTERNAL DATA SEPARATION BE USED 



h 



no 1 -^ 



vOh 
OlBC vOl 



j STEP IN 



■ih 



' DIR STP STP 



IT., ' >ilt' 

uiH riif T>- DIR S'*" 1, 

I 1 KH hi 1 K^ h 

__rL_r^^ TLTL 



READ TIMING (XTDS = 1) 



MISCELLANEOUS TIMING 



I PWW 

•■ — I ]r -\ \- ^ \- 

m n n 



|- ' CDW —^ 



—« 1_ 

h H h 



-/?— ' 



r — 1 






WRITE DATA TIMING 



See page 725 for ordering information. 
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Information furnished by Western Digital Corporation is believed to be accurate and reliable. However, no responsibility is assumed by Western Digital 
Corporation for Its use; nor for any infringements of patents or other rights of third parties which may result from its use. No license is granted by 
implication or otherwise under any patent or patent rights of Western Digital Corporation. Western Digital Corporation resen/es the right to change 

specifications at anytime without notice. 
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WESTERN DIGITAL 

CORPORAT/ON 

1771-01 Application Notes 



INTRODUCTION 

TheFD1771-01 Floppy Disk Formatter/Controller is 
a MOS/LSI device designed to ease the task of inter- 
facing the 8" or 5'/4 (mini-floppy) disk drive to a host 
processor, it is ideaiiy suited for a wide range of 
microprocessors, providing an 8-bit bi-directional 
interface to the CPU for all control and data 
transfers. Requiring standard + 12, +5V power supp- 
lies, the 1771 is available in ceramic or plastic40 pin 
du^l-in-line packages. 

The 1771 has been designed to becompatible with the 
IBM 3740 standard. This single-density Frequency 
Modulated (FM) recording technique, records a 
clock bit between a data bit serially on each track. 
Figure 1 illustrates how a HEX **D2" is recorded. 
Note that when the data bit to be written is zero, no 
pulse or flux transition is recorded. For the 8" drive, 
there are 77 tracks, with 26 sectors on each track. 
Each sector contains 128 bytes of data. Although 
there is no "standard" format for the mini-floppy, 
most manufacturers utilize either 35 or40 tracks per 
side, wtih 15 sectors of 128 bytes each per track. 
Both the 8" and 5V4" formats must be soft-sectored, 
i.e.. there are no physical holes to denote sector 
locations. The hard-sectored disk has been losing 
popularity, mainly due to the fact that the sector 
lengths cannot be increased. 

Being soft-sector compatible, the 1771 must know 
where each sector begins on the track. This is per- 
formed by using Address Marks. These bytes are 
recorded on the disk with certain clock pulses miss- 
ing, and are unique from all other data and gap bytes 
recorded on the track. Six distinct Address Marks 
can be used: 







Clock 


Description 


Data 


Pattern 


Index Address Mark 


FC 


D7 


ID Address Mark 


FE 


C7 


Data Address Mark 


FB 


C7 


User defined 


FA 


C7 


User Defined 


F9 


C7 


Deleted Address Mark 


F8 


C7 



define the type of data i.e., "object" or "text" data, 

alternate sector data, or any other purpose the user 

chooses. 

PROCESSOR INTERFACE 

The 1771 contains five internal registers that can be 
accessed via the 8-bit DAL lines by the CPU. These 
registers are used to control the movement of the 
head, read and write sectors, and perform all other 
functions at the drive. Regardless of the operation 
performed, it must be initiated through one or more 
of these registers. They are selected by a proper 
binary code on the AO, A1 lines in conjunction with 
the RE and WE lines when the device is selected. 
The registers and their addresses are: 



cs 


Ai 


Ao 


RE = 


WE = 







1 




1 

1 

X 




1 


1 

X 


STATUS REG 
TRACK REG 
SECTOR REG 
DATA REG 
Deselected 


COMMAND REG 
TRACK REG 
SECTOR REG 
DATA REG 
Deselected 



The two "User Defined" Address Marks are unique 
to the 1771. and do not appear in the IBM 3740 
standard. These Address Marks can be used to 



Command Register. This is a write-only register 
used to send all commands to the 1771 . 

Status Register: This is a read-only register that 
must be read at the completion of every command to 
determine whether execution was successful. It 
may also be used to monitor command execution, 
and to sense when data is required by the drive for 
read or write operations. 

Track Register: This R/W register holds the current 
position of the R/W head. 

Sector Register: This R/W register holds the desired 
sector number for read and write commands. 

Data Register: This R/W register contains the data 
to be read or written to a particular sector. 

INTERRUPTS 

There are two INTERRUPT lines for CPU use. These 
are the DRQ (Data Request) and INTRO (Interrupt 
Request). These are active high, open drain outputs 
and require a putl-up resistor of 10K or greater to 
+5V. Both of these signals also appear in the status 
register as the Busy (INTRO) and the data request 
(DRQ) bits. The user has the option of utilizing these 
hardware lines for system interrupts, or through 
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software by polling the status register. The choice is 
^^ dependent upon the particular microprocessor and 
N support hardware of the system. 

"T*" INTRQ: This line is used to signify the completion of 
2 any command. It is reset low when a new command * 

is loaded into the command register, or when the 

status register is read. 

DRQ: This line is active high whenever the data reg- 
ister requires servicing. During a read command, it 
signifies that the data register contains a byte of 
data from the disk and may be read by the CPU. Dur- 
ing a write command, it signifies that the data regis- 
ter is empty and may be loaded with the next byte to 
be written on the disk. The DRQ line is reset whe- 
never the data register is read or written to. It is also 
reset when a new command is loaded into the com- 
mand register, providing the new command Is not a 
Forced Interrupt, and the 1771 is not busy (Busy Bit = 0). 
WRITE SECTOR 

With the use of the WRITE SECTOR command, the 
CPU can access any desired sector(s) in a track. 
Prior to loading this command, the R/W head of the 
drive must be positioned over the specific track. 
This can be first accomplished with the use of any of 
the Type I commands. Once positioned, the CPU 
must load the desired sector number into the sector 
register, then issue the command. The head will 
load, and the 1771 will begin searching for the cor- 
rect ID field. If the correct sector and track is not 
found within 2 revolutions of the disk, the RECORD- 
NOT-FOUND bit will be set in the status register, 
and the command will be terminated. Once found, 
the 1771 will issue a DRQ in request of the first data 
byte to be written. Once the data register is loaded, 
the 1771 will issue a DRQ for each byte to be 
recorded, until the entire sector is written. For theS" 
drive, the user must load the data register 24 
microseconds after a DRQ is generated. Failure to 
meet this time will cause the lost data bit to be set, 
and a byte of zeros substituted and written on the 
disk. 

READ SECTOR 

The READ SECTOR command functions in much 
the same way as the WRITE SECTOR command. 
The sector register must again be loaded with the 
desired sector number, before the read command 
can be loaded. After the I D field has been found, the 
1 771 will begin generating DRQ's, with the data reg- 
ister being loaded with each byte of the sector field. 
For the 8" drive, the user must read the data register 
at least 26 microseconds after the DRQ is 
generated. Failure to meet this time will cause the 
lost data bit to be set in the status register, while the 
next assembled byte will overwrite the contents of 
the data register. 

Both the Read and Write sector commands also 



contain an "m" flag for accessing multiple sectors. 
The sector register is incremented internally after 
each sector is read or written to. Eventually the sec- 
tor register will exceed the physical number of sec- 
tors on the track. The user can either issue the 
Forced Interrupt command after the last sector, or 
wait for the 1771 to interrupt out. In the latter case, 
the RECORD-NOT-FOUND status bit will be set. ' 

FLOPPY DISK INTERFACE 

For the most part, the actual Floppy Disk Interface 
will consist mainly of Buffer/Drivers. Most drives 
manufactured today require an open collector TTL 
interface, with appropriate resistor terminal net- 
works. Figure 2 shows the interface of the 1771 to a 
Shugart SA400 Drive. Aside from the data seperator, 
the interface consists mainly of 7438's and 7414 TTL 
gates. A 9602 one-shot is used for the desired head 
load delay. In this illustration, the 6800 micropro- 
cessor Is used via a 6820 Peripheral interface Adap- 
ter to control all functions of the 1771. Similarly, 
other parallel port devices (such as the8255 for8080 
systems) can be used for the interface, or the 1771 
may simply be tied directly to the systems data bus 
and control lines, providing TTL loading factors are 
observed. 

DATA SEPERATION 

The internal DAT A SEP ERATOR of the 1 771 can be 
used by tying the XTDS line high, and supplying the 
combined clock and data pulses on the FD data line. 
In order to maintain an error rate better than 1 in 1 0^ 
and external data seperator is recommended. 
Since the 1 771 system clock is at 2 MHz, this allows 
for a 500 ns resolution. The internal data window will 
move 500 ns with respect to the incoming data bit. 
On the inner tracks of the drive, the bit shift is more 
severe and may occasionally cause a data or clock 
bit to fall outside of this data window. Since the 1 771 
will perform up to 5 retries, this error rate may be 
acceptable for some applications. 

When the XTDS line is forced low, the 1771 will 
accept seperated clock and data on the FDCLOCK 
and FDDATA lines. Figure 3 illustrates the timing of 
these signals. The actual FDCLOCK and FDDATA 
lines may be reversed: the 1771 will determine which 
line is clock and which is data when an Address 
Mark is detected. This feature greatly simplifies the 
design of the data seperator. 
Figure 4 illustrates the Phase-Lock Loop method for 
data seperation. The circuit operates at8 MHz. or32 
times the frequency of a received bit cell. The 
MC4024 VCO is used to supply the nominal clock 
frequency. The first 74LS161 counter provides a 
divide by 16 frequency and a carry to one side of the 
MC4044 phase detector. The other input of the 
MC4044 is tied to another 74LS161 counter which is 
affected by the incoming data stream. The output of 
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the phase detector is a signal proportional to the dif- 
ferences of the incoming pulses. This is then fed 
through a low pass filter, and to the input of the 
MC4024 to adjust the output frequency. Figures 5 
thru 8 illustrate other types of data seperators. 



These employ the "Counter Seperator" techniques 
and are quite different from the Phase-Lock-Loop 
method. With the addition of "One-Shot" delay ele- 
ment or an input clock, most of the complexity of the 
PPL circuit can be eliminated. 
















* 










[^ '"' -^ 1 1 1 1 1 1 1 




BITO 


BIT1 


BIT 2 


BIT 3 


BIT 4 


BITS 


BIT 6 


BIT 7 




HEX 1 1 1 1 
D2 


CDlcDfc CDC C cfDrC 



FIGURE 1. FM RECORDING. 



U-vv\^ 




VHSKHMOtGl'*! 



WT^F? 




■<3'.v<iii[ pnojcc 



-<h-<H=^ 




FIGURE 2. 1771 TO SHUGART SA400 DRIVE 
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3 

i 

o 



1ZTB5*0 
ErrERI^AL OATA 
SEPARATIOM 



h — 



_rL_ 



k 



MlSSlhK^ 
CLCXJK 



i 



MISSING 
DATA 






^PWX "= ^^ ^^ "^'^ '^''^^ 



_rL 



_n_ 



3000 NS MAX t ABOVE TIMES ARE DOUSLEa WHEN CLK = 1 MHZ 



Vk ^ 3S00 5000 NS. 



FIGURE 3. EXTERNAL DATA SEPERATOR TIMING. 



KM 1^ 
_fULn_|- 



- NOMINAL 



J \^ FDOATA /"^ 
CK J S FDCLOCK ^ 




FIGURE 4, CIRCUIT PROVIDED COURTESY OF MOTOROLA AND ICOM CORPS* 
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FDCLOCK 



UNSEPERATEDDATA 



_n_Ji_n_ 



K 



NOMINAL 




^ 

^ 



FIGURE 5. CIRCUIT PROVIDED COURTESY OF PROCESSOR APPLICATIONS LTD. 



O 



UNSEPARATED 
DATA FROM 
DRIVE 



D Q 

7474 

Q 
TOGGLE 



D 

74175 



=• r^> 



D Q 

74175 




LOAD PULSE 



74175 



o 



H> 



£ 

'^ 3 



L QD 

74 161 A 
O OR 
Q 741 63A c 

B EP 



7404 I ^ N. 

[y^ ii I ^ fTOFDl771-01)\^ J 

. 1 7408 \ 



i FDDATA/CLK 
l(TOFD1771-Q1) 




10 



(USE 2MHZ CLK FOR MINI-DRIVES) 



FIGURE 6. 
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^ lOfiSEC 



"""^■^ 5 IK 



9W2 



+5V 



7 SpSEC 



^ SEP CLK 
" SEP DATA 



RAW DATA JlJlJTjLrU_JLjLjLAjl^ 

SEP DATA _n_rLJ"LJi_rLJL_n_ 

— n I I I n_ 

iMsec*J 



SEP CLK 



-* SfiSEC *- 



j_ij_r 



,0 H H* VSEC 



MISSIMG CLOCKS 



FIGURE 7, CIRCUIT FftOVIOED COURTESY OF ACUTEST CORP, 
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+ READ DATA 



t — J^-dt s^ -^ 740o\. 8 1 13 ^ a1 y I ^^ ^ 

2 A 7410 X12 10 A1 h*—^ '-C ^ 



rt[r)>2 



12OOPF 4 7K 5K^ 



.^I^ 




1200PF 33K 

h5v p|r 



3.0;iS 

CI Qpi- 



i r— 5 ^C2 Q>^' 




r 



>cu 

A2 



L CL 



_9 
LlOl 7410 



rTTi B1 



■i<|>>ai 



SEP CLK 



^>»^- 



1200PF ^ ,^ 








DC D C D C D 

.READ DATA fl H H R H fl H 



D 



C 

JL 



- SEP CLK 

- SEP DATA U 



II IT 

1 u — 



"^r u ij IT 

ssKo, n n n 1 

ss2,s, 1 — n n n n n n 



SS3 (5) 
A2-6(Q,.) 



c 

Jl_ 



U IT 



n TL- 






FIGURE 8. CIRCUIT PROVIDED COURTESY OF SHUGART ASSOCIATES. 
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Information tumlatied by Western Digital Corporation is believed lo be accurate and rehable. However, no responsibility is assumed by Western Digital 
Corporation for its use; nor lor any ir^fringements of patents or other rights of ttiird parties which may resuil troin its use. I^o iicense is granted by 
implication or otherwise under any patent or patent rights of Western Digitaf Corporation. Western Digital Corporation reserves the riflht to change 
speoif icationsat anyttme without notice. ** 
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WESTE/tm DIGITAL 

COPPORAT/ ON 

FD179X-02 
Floppy Disk Formatter/Controlier Family 



FEATURES 

• TWOVFOCONTROLSIGNALS — RGSlVFOE 

• SOFTSECTORFORMATCOMPATIBILITY 

• AUTOMATIC TRACK SEEK WITH VERIFICATION 

• ACCOM MODATES SINGLE AND DOUBLE DENSITY 
FORMATS 

IBM 3740 Single Density (FM) 

IBM Syslem 34 Double Density (MFM) 

Non IBM Format for Increased Capacity 

• READ MODE 

Single/Multiple Sector Read with Automatic Search or 

Entire Track Read 
Selectable 128, 256, 512 or 1024 Byte Sector Lengths 

• WRITE MODE 

Single/Multiple Sector Write with Automatic Sector 

Search 
Entire Track Write for Diskette Fonnatting 

• SYSTEM COMPATIBILITY 

Double Buffering of DataS Bit Bl-Directional Bus for 

Data, Control and Status 
DMA or Programmed Data Transfers 
All Inputs and Outputs are TTL Compatible 
On-Chip Track and Sector Registers/Comprehensive 

Status Infomnation 



PROGRAMMABLE CONTROLS 

Selectable Track to Tiack Stepping Time 

Side Select Compare 

INTERFACES TO WD1691 DATA SEPARATOR 

WINDOW EXTENSION 

INCORPORATES EN CODING/ DECODING AND 

ADDRESS MARK CIRCUITRY 

FD1792/4 IS SINGLE DENSITY ONLY 

FD1795/7 HAS A SIDE SELECT OUTPUT 

179X^02 FAMILY CHARACTERISTICS 



CD 

X 

■ 

p 

ro 



FEATURES 


1791 


1792 


1793 


1794 


179S 


1797 


Single Density(FM) 


X 


X 


X 


X 


X 


X 


Double Density (MFM) 


X 




X 




X 


X 


Toje Data Bus 






X 


X 




X 


Inverted Data Bus 


X 


X 






X 




Write Precomp 


X 


X 


X 


X 


X 


X 


Side Selection Output 


1 




' TK. ' 




X 


X 



APPUCATIONS 



i>m 



\mJ^JSBC- 



DD 

8" FLOPPY AND 5 V4'' MINI FLOPPY CONTROLLER 
SINGLE OR DOUBLE DENSITY 
CONTROLLER/ FORMATTER 



NC c 



•*DALO 

BalT 
6al2 

Sin 
Bicn 

6al1 

OlCT C 
STCPC 
D<RC C 
EARLV C 
tATE C 
MR C 



TIT- 



40 "I 

38 n 

37 1 

mH 

35 
34 
33 P 

D! 
31 
30 
24 
?0 









DRQ 
WPRT 

Tr5o 

WFJVFOE 

ftEADV 

WD 

WG 

TG*3 

HLD 

RAW ^6 AD 

flCLK 



TEST 



JV„(4&V] 



'CC 



' 1791/3 =RG 1795/7 ^SSO 
'1T93/7 TRUE BUS 
M 792/4 OPEN 

PIN CONNECTIONS 



•c 


DATA m 


"> 




AO 






A1 






cs 






RE 


^ 




WE 






MR 





ORG 



INTRO 



CLK 



r 



DDEN 



FLOPPY DISK 
CONTROLLER 
FORMATTER 



vss Vdp vcc 



READY 



STEP 



DIRC 



HtO 



F 
L 
O 
P 
P 
¥ 

D 
\ 

S 
K 

I 

M 
T 
E 
R 
F 
A 
C 
E 



HLT 



ONE SHOT 
(IF USED) 



+12 +W 



FD179X SYSTEM BLOCK DIAGRAM 
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PIN OUTS 



I 



PIN 
NUMBER 



1 
19 



20 
21 
40 



PIN NAME 



NO CONNECTION 
MASTER RESET 



POWER SUPPLIES 



SYMBOL 



NC 

m 



COMPUTER INTERFACE: 
2 



3 

4 

5,6 



WRITE ENABLE 
CHIP SELECT 
READ ENABLE 
REGISTER SELECT LINES 



7-14 



24 



38 



38 



DATA ACCESS LINES 



CLOCK 



DATA REQUEST 



INTERRUPT REQUEST 



Vss 

Vcc 
Vdd 

WE 

m 

A0,A1 



DALt>DAL7 



FLOPPY DISK INTERFACE 



15 
16 

17 
18 



STEP 
DIRECTION 

EARLY 
LATE 



CLK 



DRQ 



INTRQ 



STEP 
DIRC 

EARLY 
LATE 



FUNCTJON 



Pin 1 is internally connected to a back bla^ generator and 
must be left open by the user, 

A logic low (50 microseconds minj on this input resets the 
device and loads HEX 03 into the command register. The Not 
Ready {Status Bit 7) is reset during MR ACTIVE When MR Is 
brought to a logic high a RESTORE Comnnand Is executed, 
regardless of the state of the Ready signal from ttie drive. 
Also, HEX 01 is loaded into sector register. 

Ground 
+ 5V ±5% 
+ 12V±5% 



A logic low on this In^t gates data on the DAL into the 

selected register when CS is low, 

A logic low on this input selects the chip and enables 
computercommunlcation with the device. 

A logic low on this input controls the placement of data from a 

selected register on the DAL when CS is low. 

These Inputs select the register to receive/transfer data on the 
DAL lines under RE and WE control: 



CS A1 AO 



RE 



WE 



Status Reg Command Reg 

1 Track Reg Track Reg 

1 Sector Reg Sector Reg 

1 1 Data Reg Data Reg 

Eight bit Bidirectional bus used for transfer of data, control, 
and status. This bus is receiver enabled by WE or transmitter 
enabled by RE. Each line will drive 1 standard TTL load. 

This input requires a f re&njnnlng 50% duty cycle square wave 
clock for internal timing reference, 2 MHz ± 1% for 8'' drives, 
1 MHz dt1% for mini-floppies. 

This open drain output indicates that the DR contains 
assembled data in Read operations, or the DR is empty in 
Write operations. This signal Is reset when serviced by the 
computer through reading or loading the DR In Read or Write 
operations, respectively. Use 10K pull-up resistor to + 5. 

This open drain output Is set at the completion of any com- 
mand and is reset when the STATUS register is read or the 
command register is written to. Use 10K pull-up resistor to 
+ 5. 



The step output contains a pulse for each step. 

Direction Output Is active high when stepping in, active low 
when stepping out. 

Indicates that the WRITE DATA pulse occuring while Early fs 
active (high) should be shifted early for write preconv 
pensatlon. 

Indicates that the write data pulse occurring while Late f$ 
activ e (high) should be shifted late for write pracompensatlon. 
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PIN 
NUMBER 


PIN NAME 


SYMBOL 


FUNCTION 


22 


TEST 


TEST 


This Input is used for testing purposes only and should be tied 
to + 5V or left open by the user unless interfacing to voice coil 
actuated steppers. 


23 


HEAD LOAD TIMING 


HLT 


When a logic high is found on the HLT input the head is 
assumed to be engaged. It is typically derived from a 1 shot 
triggeretfbyHLD. 


25 


READ GATE 

(1791,1792,1793.1794) 

- 


RG 


This output is used for synchronization of external data 
separators. The output goes high after two Bytes of zeros in 
single density, or 4 Bytes of either zeros or ones in double 
density operation. 


25 


SIDE SELECT OUTPUT 
(1795, 1797) 


SSO 


The logic level of the Side Select Output is directly controlled 
by the 'S' flag in Type II or III commands. When U = 1, SSO is 
set to a logic 1 . When U = 0, SSO is set to a logic 0. The SSO 
is compared with the side information in the Sector I.D. Field. 
If they do not compare Status Bit 4 (RNF) is set. The Side 
Select Output is only updated at the beginning of a Type II or 
III command. It is forced to a logic upon a MASTER RESET 
condition. 


26 
27 


READ CLOCK 


RCLK 


A nominal square-wave clock signal derived from the data 
stream must be provided to this input. Phasing (i.e. RCLK 
transitions) relative to RAW READ is important but polarity 
(RCLK high or low) is not. 

The data input signal directly from the drive. This Input shall 
be a negative pulse for each recorded flux transition. 


RAW READ 


RAW READ 


28 


HEAD LOAD 


HLD 


The HLD output controls the loading of the Bead-Write head 
against the media 


29 


TRACK GREATER THAN 43 


TG43 


This output informs the drive that the ReadA/Vrlte head is 
positioned between tracks 44-76. This output is valid only 
during Read and Write Commands. 


30 


WRITE GATE 


WG 


This output is made valid before writing is to be performed on 
the diskette. 


31 


WRITE DATA 


WD 


A 200 ns (MFM) or 500 ns (FM) output pulse per flux transition. 
WD contains the unique Address marks as well as data and 
clock In both FM and MFM fonmats. 


32 
33 

34 


READY 


READY 


This input indicates disk readiness and is sampled for a logic 
high before Read or Write commands are performed. If Ready 
is low the Read or Write operation is not perfomied and an 
interrupt is generated. Type 1 operations are performed 
regardless of the state of Ready. The Ready input appears in 
inverted fomiat as Status Register bit 7. 

This is a bi-directional signal used to signify writing faults at 
the drive, and to enable the external PLO data separator. When 
WG = 1, Pin 33 functions as a WF input If WF = 0, any write 
command will immediately be terminated. When WG = 0, Pin 
33 functions as a VFOE output. VFOE will go low during a read 
operation after the head has loaded and settled (HLT = 1). On 
the 1795/7, it will remain low until the last bit of the second 
CRC byte in the ID field. VFOE will then go high until 8 bytes 
(MFM) or 4 bytes (FM) before the Address Mark. It will then go 
active until the last bit of the second CRC byte of the Data 
Field. On the 1791/3, VFOE will remain low until the end of the 
Data Field. This pin has an Intemal 100K Ohm pull-up resistor. 

This input infomris the FD179X that the Read/Write head Is 
positioned over Track 00. 


WRITE FAULT 
VFO ENABLE 


WF/VFOE 
TROO 


TRACK 00 
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PIN NUMBER 


PIN NAME 


SYMBOL 


FUNCTION 


35 
36 

37 




IP 


This input informs the FD179X when the index hole is en- 
countered on the diskette. 

This input Is sampled whenever a Write Command is received. 
/K logic low terminates the command and sets the Write 
Protect Status bit. 

This Input pin selects either single or double density 
operation. When DDEN = 0, double density is selected. When 
DDEN = 1, single density is selected. This line must be left 
open on the 1792/4. 


INDEX PULSE 


WRITE PROTECT 


WPRT 


DOUBLE DENSITY 


DDEN 



GENERAL DESCRIPTION 

The FD179X are N-Channel Silicon Gate MOS LSI 
devices which perform the functions of a Floppy Disk 
Formatter/Controller in a single chip implementation. 
The FD179X, which can be considered the end result 
of both the FD1771 and FD1781 designs, is IBM 3740 
compatible in single density mode (FM) and System 34 
compatible in Double Density Mode (MFM). The 
FD179X contains all the features of its predecessor the 
FD1771, plus the added features necessary to 
read/write and format a double density diskette. These 
include address mark detection, FM and MFM encode 
and decode logic, window extension, and write precom- 
pensation. In order to maintain compatibility, the 
FD1771, FD1781, and FD179X designs were made as 
close as possible with the computer interface, instruc- 
tion set, and I/O registers being identical. Also, head 
toad control is Identical. In each case, the actual pin 
assignments vary by only a few pins from any one to 
another. 

The processor interface consists of an 8-bit bi-direc- 
tional bus for data, status, and control word transfers. 
The FD179X is set up to operate on a multiplexed bus 
with other bus-oriented devices. 

The FD179X is TTL compatible on all inputs and 
outputs. The outputs will drive ONE TTL load or three 
LS loads. The 1793 is identical to the 1791 except the 
DAL lines are TRUE for systems that utilize true data 



The 1795/7 has a side select output for controlling 
double sided drives, and the 1792 and 1794 are "Single 
Density Only" versions of the 1791 and 1793 respec- 
tively. On these devices, DDEN must be left open. 

ORGANIZATION 

The Floppy Disk Formatter block diagram is illustrated 
en page 5. The primary sections include the parallel 
processor Interface and the Floppy Disk interface. 

Data Shift Register — This 8-bit registe r assembles 
serial data from the Read Data input (RAW READ) 
during Read operations and transfers serial data to the 
Write Data output during Write operations. 
Data Register — This 8-blt register is used as a 
holding register during Disk Read and Write operations. 
In Disk Read operations the assembled data byte Is 
transferred In paialiel to the Data Register from the 
Data Shift Register. In Disk Write operations In- 
formation Is transferred in parallel from the Data 
Register to the Data Shift Register. 



When executing the Seek command the Data Register 
holds the address of the desired Track position. This 
register is loaded from the DAL and gated onto the 
DAL under processor control 

Track Register — This 8-bit register holds the track 
number of the current Read/Write head position. It Is 
incremented by one every time the head Is stepped in 
(towards track 76) and decremented by one when the 
head is stepped out (towards track 00). The contents of 
the register are compared with the recorded track 
number in the ID field during disk Read, Write, and 
Verify operations. The track Register can be loaded 
from or transfen'ed to the DAL This Register should 
not be loaded when the device is busy. 
Sector Register (SR) — This 8-bit register holds the address 
of the desired sector position. The contents of the register 
are compared with the recorded sector number in the ID 
field during disk Read or Write operations. The Sector 
Register contents can be loaded from or transfen^ed to the 
DAL This register should not be loaded when the device is 
busy. 

Command Register (CR) — This 8-bit register holds the 
command presently being executed. This register should 
not be loaded when the device is busy unless the new 
command is a force intenupt. The command register can 
be loaded from the DAL but not read onto the DAL 
Status Register (STR) ^ This S-bit register holds device 
Status information. The meaning of the Status bits is a 
function of the type of command previously executed. This 
register can be read onto the DAL, but not loaded from the 
DAL 

CRC Logic — This logic is used to check or to generate the 
16-bit Cyclic Redundancy Check (CRC). The polynomial is: 
G{x) = x^« -1- x^« -I- x» -I- 1. 

The CRC Includes all information starting with the address 
mark and up to the CRC characters. The CRC register is 
preset to ones prior to data being shifted through the 
circuit 

Arithmetic/Logic Unit (ALU) - The ALU is a serial com- 
parator, incrementer, and decrementer and is used for 
register modification and comparisons with the disk 
recorded ID field. 

Timing and Control — All computer and Floppy Disk In- 
terface controls are generated through this logic. The In- 
ternal device timing Is generated from an external crystal 
clock. 

The FD179X has two differen t mode s of o peration ac- 
cording to the state of DDEN. When DDEN = double 
density (MFM) Is assumed. When DDEN = 1, single 



228 Appendix II 



FD179X Applications 



[DAL) 



DATA 
SHIFT 
REG 



^ 



AM DETECTOR 



H* 



t( 



< RAW READ 



TI 

O 

o 



-<C RCLK 





DRO 






CONTROL _ 










vyc 






COMPUTER 

INTERFACE 

-■ CONTROL 


PLA 
CONTROL 
(230 X 16) 


CONTROL 


DISK 

INTERFA,-.E 
CONTRO- 




TG43 


-*- 




INTRO 








WPHT 




MS 




4 








WF'VFOE 


^ 




* 


IP 






CS 








^ 


TROO 






RE 








. 


riEADY 




^ 






AO 










STEP 


^ 






01 RC 






Ai 










EARLY 






K .- ( iP ■ ►.«*- 




^ 






LATE 








Ra'SSO 




" 


HLD 




DDEN- 






HLT 














* 







-NOT USED ON 1792 4 



FD179X BLOCK DIAGRAM 



density (FM) is assumed. 1792 & 1794 are single density 
only. 

AM Detector — The address mark detector detects ID, data 
and index address marks during read and write operations. 

PROCESSOR INTERFACE 

The Interface to the processor is accomplished through the 
eight Data Access Lines (DAL) and cssociated control 
signals. The DAL are used to transfer Data, Status, and 
Control words out of, or into the FD179X. The DAL are three 
state buffers that are enabled_as output drivers when Chip 
Select (CS) and Read Enable (RE)_are active (low logic state) 
or act as input receivers when CS and Write Enable (WE) 
are active. 

When transfer of data with the Floppy Disk Controller Is 
required by the host processor, the device address is 
decoded and CS Is made low^The address bits A1 and AO, 
combined with the signals RE during a Read operation or 
WE during a Write operation are interpreted as selecting 
the following registers: 



AI - AO 



READ (RE) 



WRITE (WE) 






1 
1 





1 


1 



status Register 
Track Register 
Sector Register 
Data Register 



Command Register 
Track Register 
Sector Register 
Data Register 



During Direct Memory Access (DMA) types of data 
transfers between the Data Register of the FD179X and the 
processor, the Data Request (DRQ) output Is used in Data 
Transfer control. This signal also appears as status bit 1 
during Read and Write operations. 
On Disk Read operations the Data Request is activated (set 
high) when an assembled serial input byte is transferred in 
parallel to the Data Register. This bit is cleared when the 
Data Register is read by the processor. If the Data Register 
Is read after one or more characters are lost, by having new 
data transferred Into the register prior to processor readout, 
the Lost Data bit is set in the Status Register. The Read 
operation continues until the end of sector Is reached. 
On Disk Write operations the data Request Is activated 
when the Data Register transfers its contents to the Data 
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Shift Register, and requires a new data byte. It is reset 
when the Data Register is ioaded with new data by the 
processor, if new data is not loaded at the time the next 
serial byte lis required by the Floppy Disk, a byte of zeroes 
13 written on the diskette and the Lost Data bit is set in the 
Status Register* 

At the completion of every command an INTRQ is 
generated, il^TRQ Is reset by either reading the status 
register or by loading the command register with a new 
command. In addition, INTRQ is generated If a Force 
Interrupt command condition is met. 
The 179X_has two modes of operation according to the 
state of DDEN (Pin 37). When DDER = 1, single density is 
selected. In either case, the CLK input (Pin 24) Is at 2 MHz. 
However, when interfacing with the mini-floppy, the CLK 
Input Is set at 1 MHz for both single density and double 
density, 

GENERAL DISK READ OPERATIONS 
Sector lengths of 128, 256, 512 or 1024 are o btainable in 
either FM or MFM formats. For FM, DDEN should be 
placed to logical "1" For MFM formats, DDEN should be 
placed to a logical "0." Sector lengths are detemiirfod at 
format time by the fourth byte in the "ID" field 



Sector Length Table* 



Sector Length 
Field (hex) 



Numtter of Bytes 
in Sector (decimal) 



00 
01 
02 
03 



128 

256 

512 

1024 



*1795/97 may vary — see command summary. 
The number of sectors per track as far as the FD179X is 
concerned can be from 1 to 255 sectors. The number of 
tracks as far as the FD179X Is concerned is from to 2^ 
tracks. For IBM 3740 compatibility, sector lengths are 128 
bytes with 26 sectors per track. For System 34 com- 
patibility (MFM), sector lengths are 256 bytes/sector with 26 
sectors/tnack; or lengths of 1024 bytes/sector with 8 
sectors/track. (See Sector Length Table) 
For rea d operation s in S'* double density the FD179X 
requires RAW READ Data (Pin 27) signal which fs a 200 OS 
pulse per flux tiansition and a Read clock (RCLK) signal to 
Indicate flux transition spacings. The RCLK {Pin 26) signal 
Is provided by some drives but If not it may be derived 
extemally by Phase lock loops, one shots, or counter 
techniques. In addition, a Read Gate Signal is provided as 
an output (Pin 25) on 1791/92/93/94 which can be used to 
inform phase lock loops when to acquire synchronization. 
When reading from the media In FM. RG Is made tote when 
2 bytes of zeroes are detected. The FD179X must find an 
address mark within the next 10 bytes; othen^lse RG is 
reset and the search for 2 bytes of zeroes begins all over 
again. If an address mark is found within 10 bytes, RG 
remains true as long as the FD179X is deriving any useful 
infonnation from the data stream. Similarly for MFM, RG is 
made active when 4 bytes of "00'* or "FF" are detected. The 
FD179X must find an address mark within the next 16 
bytes, otherwise RG is reset and search r esume s. 
During read operations {WG =^ OX the VF OE (Pin 33) Is 
provided for phase lock loop synchronization. VFOE will go 
active low when: 



a) Both HLT and HLDare True 

b) Settling Time, If programmed, has expired 

c) The 1 79X is Inspecti ng d ata off the d I sk 

If WF/VFOE Is not used, leave open or tie to a 10K resistor 

to +5. 

GENERAL DISK WRITE OPERATION 

When writing is to take place on the diskette the Write Gate 

(WG) output Is activated, allowing current to flow into the 
Read/Write head. As a precaution to erroneous writing the 
first data byte must t)e loaded into the Data Register in 
response to a Data Request from the FD179X before the 
Write Gate signal can be activated. 
Writing is inhibited when the Write Prtitect Input is a logic 
low, in which case any Write command is immediately 
terminated, an intenxipt is generated and the Write Protect 
status bit Is set The Write Fault Input, when activated, 
signifies a writing fault condition detected In disk cfrive 
electronics such as failure to detect write current flow 
when the Write Gate is activated. On detection of this fault 
the FD179X tenninates the current commandp a nd sets the 
Write Fault bit (bit 5) in the Status Word. The Write Fault 
input should be made inactive when the Writ© Gate output 
becomes inactive. 

For w^^te operations, the FD179X provides Write Gate (Pin 
30) and Write Data (Pin 31) output s. Write data consists of a 
series of 500 n s puls es In ffA (DDEN = 1) and 200 ns 
pulses in MFM (DDEN = 0). Write Data provides the unique 
address marks in both fonnats. 

Also during write, two additional signals are provided for 
write precompensation. These are eArlY (Pin 17) and 
LATE (Pin 18). EARLY is active true when the WD pulse 
appearing on (Pin 30) is to be written EARLY, LATE Is active 
tme when the WD pulse is to be written LATE If both 
EARLY and l-ATE are low when the WD pulse is present, 
the WD pulse is to be written at nominal Since write 
precompensation values vary from disk manufacturer to 
disk manufacturer, the actual value is detemnlned by 
several one shots or delay lines which are located extemal 
to the FD179X. The write precompensation signals EARLY 
and LATE are valid for the duration of WD In both FM and 
MFM formatSv 

READY 

Whenever a Read or Write command (Type II or 111) Is 
received the FD179X samples the Ready input. If this input 
Is logic low the command is not executed and an intemjpt 
Is generated. All Type I commands are perfomied re- 
gardless of the state of the Ready input. Also, whenever a 
Type II or III command is received, the TG43 signal output 
is updated. 

COMMAND DESCRIPTION 

The FD179X will accept eleven commands. Command 
words should only be loaded in the Command Register 
when the Busy status bit is off (Status bit 0). The one 
exception is the Force Interrupt command. Whenever b 
command is being executed, the Busy status bit Is set 
When a command Is completed, an intemipt is generated 
and the Busy status bit is reset. The Status Register 
indicates whether the completed command encountered 
an error or was fault free. For ease of discussion, 
commar>ds are divided into four types. Commands and 
types are summarized in Table 1 
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TABLE 1. 


COMMAND SUMMARY 














A. CommandsforModels: 1791. 1792, 1793, 1794 








B. Commands for Models: 1795, 1797 










Bits 














Bits 








Type Command 


7 


6 


5 4 


3 


2 


1 





7 


6 


5 


4 3 


2 


1 





1 Restore 











h 


V 


n 


ro 











h 


V 


M 


ro 


1 Seek 








1 


n 


V 


^1 


ro 











1 h 


V 


ri 


ro 


1 Step 








1 T 


h 


V 


n 


ro 








1 


T h 


V 


n 


ro 


1 Step-in 





1 


Q T 


h 


V 


n 


ro 





1 





T h 


V 


n 


ro 


1 Step-out 





1 


1 T 


h 


V 


ri 


ro 





1 


1 


T h 


V 


ri 


ro 


II Read Sector 







m 


S 


E 


C 













m L 


E 


u 





II Write Sector 







1 m 


S 


E 


C 


ao 







1 


m L 


E 


u 


ao 


III Read Address 




1 








E 










1 








E 


u 





III Read Track 




1 


1 





E 










1 


1 





E 


u 





111 Write Track 




1 


1 1 





E 










1 


1 


1 


E 


u 





IV Force Interrupt 




1 


1 


13 


12 


l1 


»0 




1 





1 13 


12 


h 


lO 



FLAG SUMMARY 



TABLE ^ FLAG SUMMARY 



T1 

o 

(O 
>< 

o 
ro 



Command 
Type 


Bit 
No(s) 




Description 




0,1 


ri ro = Stepping Motor Rats 
See Table 3 for Rate Summary 








2 


V = Track Number Verify Flag 


V = 0, No verify 

V = 1, Verify on destination track 






3 


h = Head Load Flag 


h = 1, Load head at beginning 
h = 0, Unload head at beginning 






4 


T = Track Update Flag 


T = 0, No update 

T = 1, Update track register 




II 





ao = Data Address Mark 


ao= 0,FB(DAM) 

ao= 1,F8 (deleted DAM) 




II 


1 


C = Side Compare Flag 


C = 0, Disable side compare 
C = 1, Enable side compare 




II & III 


1 


U = Update SSO 


U =0, Update SSO too 
U = 1, Update SSO to 1 




II & III 


2 


E= 15 MS Delay 


E =0, No 15 MS delay 
E = 1,15 MS delay 




II 
II 

II 


3 
3 

4 


S = Side Compare Flag 
L = Sector Length Flag 


S = 0, Compare for side 
S = 1, Compare for side 1 




LSB's Sector Length in ID Field 
00 01 10 11 


L = 256 512 1024 


128 


L = 1 128 256 512 


1024 


m = Multiple Record Flag 


m = 0, Single record 
m = 1, Multiple records 




IV 


0-3 


Ix = Interrupt Condition Flags 

10 = 1 Not Ready To Ready Transition 

11 = 1 Ready To Not Ready Transition 

12 = 1 1ndex Pulse 

13 = 1 1mmediate Interrupt, Requires A Reset 
l3-l0 = Terminate With No Interrupt (INTRQ) 





*NOTE: See Type IV Command Description for further information. 
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TYPE I COMMANDS 

The Type I Commands include the Restore, Seek, Step, 
Step-in, and Step-Out commands. Each of the Type t 
Commands contains a rate fieJd (no H), which detemnines 
the stepping motor rate as defined in Table 3. 
A 2 ps (MFM) or 4 pS (FM) pulse is provided as an output to 
the drive. For every step pulse issued, the drive moves one 
track location in a direction determined by the direction 
output The chip will step the drive in the same direction it 
last stepped unless the command changes the direction. 
The Direction signal is active high when stepping in and 
low when stepping out. The Direction signal is valid 12 ^s 
bef o re t he f i rst stepping pu I se i s ge nerated . 

The rates (shown in Table 3) can be applied to a Step- 
Direction Motor through the device interface. 

TABLE 3. STEPPING RATES 



CLK 


2 MHz 


SMHi 


1 MHz 


1 MHz 


2 MHz 


1 MHz 


DDfiN 





1 





1 


X 


¥ 


R1 RO 


TEST=1 


TESt=1 


TESTM 


TEST=1 


TEST=0 


TESTrO 





3 ms 


3m$ 


6 ms 


6 ms 


lS44fS 


368^3 


1 


6 ms 


6 ms 


12 ms 


12 ms 


ido^s 


380^3 


1 


10 m$ 


10 ms 


20 ms 


20 ms 


iSBfiS 


396mS 


1 1 


i&ms 


15 ms 


30 ms 


30 ms 


2D8^s 


416m* 



After the last directional step an additional 15 milliseconds 
of head settling time takes place if the Verify flag is set in 
Type I commands. Note that this time doubles to 30 ms for 
a 1 MHz clock. If TEST = 0, there is zero settling tima 
There is also a 15 ms head settling time if the E flag is set in 
any Type II or III comnnand. 

When a SeeK^ Step or Restore command is executed an 
optional verification of Read-Whte head position can be 
performed by settling bit 2 (V = 1) in the command word to 
a logic 1 . The verification operation begins at the end of the 
15 millisecond settling time after the head Is loaded against 
the media The track number from the first encountered ID 
Field is compared against the contents of the Track 
Register, if the track numbers compare and the ID Field 
Cyclic Redundancy Check (CRC) is correct, the verify 
operation is complete and an INTRQ is generated with no 
errors. If there is a match but not a valid CRC, the CRC error 
status bit is set (Status bit 3), and the next encountered ID 
field is read from the disk for the verification operation. 

The FDlt9X must find an fD field with correct track number 
and correct CRC within 5 revolutions of the media; 
otherwise the seek error is set and an INTRQ is generated. 
It V = 0, no verification is performed. 

The Head Load (HLD) output controls the movement of the 
read/write head against the media. HLD is activated at the 
beginning of a Type I command if the h flag is set (h = 1), at 
the end of the Type I command if the verify flag (V = 1), or 
upon receipt of any Type 11 or III command. Once HLD is 
active it remains active until either a Type I command is 
received with (h = and V = 0); or if the FD179X is in an 
idle state (non-busy) and 15 index pulses have occurred 



Head Load timing (HLT) is an input to the FD179X which is 
usedfortheheadengagetimaWhenHLT - 1,theFD179X 
assumes the head is completely engaged The head 
engage time is typically 30 to 100 ms depending on drive. 
The low to high transition on HLD is typically used to fire a 
one shot. The output of the one shot is then used for HLT 
and supplied as an input to the FD179X. 



HLDf- 






-50 TO lOOmS- 



HLT {FROM ONE SHOT) 



HEAD LOAD TIMING 

When both HLD and HLT are true, the FD179X will then 
read from or write to the media. The ''and'* of HLD and HLT 
appears as status Bit 5 in Type I status. 

In summary for the Type I commands: if h = and V = 0, 
HLD is reset. If h = 1 and V = 0, HLD is set at the 
beginning of the command and HLT is not sampled nor is 
there an internal 15 ms detay. If h = and V = 1, HLD is 
set near the end of the command, an internal 15 ms occurs, 
and the FD179X waits for HLT to be tnje. If h = 1 and V = 
1, HLD is set at the beginning of the command. Near the 
end of the command, after all the steps have been issued, 
an interna? 15 ms delay occurs and the FD179X then waits 
for HLT to occur. 

For Type n and 111 commands with Eflag off, HLD is made 
active and HLT is sampled until true. With E flag on, HLD is 
made active, an internal 15 ms delay occurs and then HLT 
is sampled until tnie. 

RESTORE (SEEK TRACK 0) 



Upon receip t of th is command the Track 00 (TROD) input is 
sampled If TROD is active few indicating the Read-Write 
head is positioned over track 0, the Track Regi ster is loaded 
with zeroes and an intan^upt is generated. If TROO is not 
active low, stepping pulses (pins 15 to 16) at a rate specified 
by the ri rg field are issued until the TROO input is activated. 
At this time the Track Regist er is fo aded with zeroes and an 
interrupt is generated. If the TROO input does not go active 
low after 255 stepping pulses, the FD179X terminates 
operation, internjpts, and sets the Seek ernar status bit, 
providing the V flag is set. A verification operation also 
takes place if the V flag is set. The h bit allows the head to 
be loaded at the start of command. Note that the Restore 
command is executed when MR goes from an active to an 
inactive state and that the DRQ pin stays low. 

SEEK 

This command assumes that Ihe Track Register contains 
the track number of the current position of the Read-Wrfte 
head and the Data Register contains the desired track 
number. The FD179X will update the Track register and 
issue stepping puises in the appropriate direction until the 
contents of the Track register are equal to the contents of 
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RESET 
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YES 
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^ 




SET DIRECTION 




Q 



I 



TYPE I COMMAND FLOW 

the Data Register (the desired track location). A verification 
operation takes place if the V flag is on. The h bit allows the 
head to be loaded at the start of the command. An interrupt 
is generated at the completion of the command. Note: 
When using multiple drives, the track register must be 
updated for the drive selected before seeks are issued. 

STEP 

Upon receipt of this command, the FD179X issues one 
stepping pulse to the disk drive. The stepping motor 
direction is the same as in the previous step command. 
After a delay determined by the ^VO field, a verification 
takes place if the V flag is on. If the U flag is on, the Track 
Register is updated. The h bit allows the head to be loaded 
at the start of the command. An interrupt is generated at 
the completion of the command. 

STEP-IN 

Upon receipt of this command, the FD179X issues one 
stepping pulse in the direction towards track 76. If the U 



TYPE I COMMAND FLOW 

flag is on, the Track Register is incremented by one. After a 
delay determined by the 1*1 ro field, a verification takes place 
if the V flag is on. The h bit allows the head to be loaded at 
the start of the command. An intemipt Is generated at the 
completion of the command. 

STEP-OUT 

Upon receipt of this command, the FD179X issues one 
stepping pulse in the direction towards track 0. If the U flag 
is on, the Track Register is decremented by one. After a 
delay detemnined by the nro field, a verification takes place 
if the V flag is on. The h bit allows the head to be loaded at 
the start of the command. An intenojpt is generated at the 
completion of the command. 

EXCEPTIONS 

On the 1735/7 devices, the BSD output is not affected 
during Type 1 commands, and an internal side compare 
does not take place when the (V) Verify Flag is on. 
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TYPE I COMMAND FLOW 

TYPE II COMMANDS 

The Type II Commands are the Read Sector and Write 
Sector commands. Prior to loading the Type II Command 
*nto the Command Register, the computer must load the 
Sector Register with the desired sector number. Upon 
receipt of the Type f I command, the busy status Bit Is set H 
the E flag = 1 (this is the normal case) HLD is made active 
and HLT Is sampled after a 15 msec delay. If the E flag is 0, 
the head is lo^^ed and HLT sampled with no 15 msec 
delay. The ID field and Data Field format are shown on page 
13. 

When an ID field Is located on the disK the F0179X 
compams the Track Number on the ID field with the Track 
Register If them Is not a match, the next encountered ID 
field is read and a comparison is again made. If there was a 
match, the Sector Number of the ID field Is compared with 
the Sector Register If there Is not a Sector match, the next 
encountered ID field is read off the disk and comparisons 
again made. If the ID field CRC Is correct the data field Is 



then located and will be either written into, or read from 
depending upon the command. The FD179X must find an 
ID field with a Track number, Sector number, side number, 
and CRC within four revolutions of the drsk; otherwise, the 
Record not found status bit is set (Status bit 3) and the 
command is terminated with an inlemipt. 




SETBJSy, RESET OHQ. LOST 

DATA. RtCOAD MOT FDUN D' 4 

STATLfi BITS S » ft iMrnO 



C 



IhTRQ 
RESET BUST 



^ 




INTAQ. M3CT BUST 
Srr «»flTE PROTECT 



•note rp Jekt II THtHf i:h no isMsntiAv 

If TfST 1 AND cm I MMLr TMEHf iS -4HS OllAV 



TYPE II COMMAND 
Each of the Type II Commands contains an (m) flag which 
determines if multiple reconds (sectors) are to be read or 
written, depending upon the command. If m = 0, a single 
sector Is read or written and an intenupt is generated at the 
completion of the command, if m = 1, multiple records are 
reed or written with the sector register internally updated 
so that an address verification can occur on the next 
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record. The FD179X wi|l continue to read or write multiple 
records and update the sector register in numerical 
ascending sequence until the sector reglister exceeds the 
number of sectors on the track or until the Force Intenxipt 
command is loaded into the Command Register, which 
terminates the command and generates an interrupt. 

For example: If the FD179X is instructed to read sector 27 
and there are only 26 on the track, the sector register ex- 
ceeds the number available. The FD179X will search for 5 
disk revolutions, inten^upt out, reset busy, and set the 
record not found status bit. 

The Type II commands for 1791-94 also contain side select 
compare flags. When C = (Bit 1) no side comparison is 
made. When C = 1, the LSB of the side number is read off 
the ID Field of the disk and compared with the contents of 
the (S) flag (Bit 3). If the S flag compares with the side 
number recorded in the ID field, the FD179X continues with 
the ID search. If a comparison is not made within 6 index 
pulses, the interrupt line is made active and the Record- 
Not-Found status bit is set. 




jnd/ 



BRING IN SECTOR LENGTH FIELD 

STORE LENGTH IN INTERNAL 

REGISTER 








The Type II and III commands for the 1795-97 contain a side 
select flag (Bit 1). When U = 0, SSO is updated to 0. 
Similarly, U - 1 updates SSO to 1 The chip compares the 
SSO to the ID field. If they do not compare within 5 
revolutions the interrupt line is made active and the RNF 
status bit is set. 

The 1795/7 READ SECTOR and WRITE SECTOR com- 
mands include a 'L' flag. The V flag, in conjunction with 
the sector length byte of the ID Field, allows different byte 
lengths to be implemented in each sector. For IBM 
compatability, the V flag should be set to a one. 

READ SECTOR 

Upon receipt of the Read Sector command, the head is 
loaded, the Busy status bit set, and when an ID field is 
encountered that has the correct track number, con-ect 
sector number, correct side number, and correct CRC, the 
data field is presented to the computer. The Data Address 
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I 4 J f INTRO RESET BUSY j 



TYPE II COMMAND 
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WRITE SECTOR 
SEQUENCE 



DELAY 2 BYTES OF GAP 



DELAY 8 BYTES OF GAP 




p4 INTRO. RESET BUSY^ 
" SET LOSTT^ATA J 



DELAY 1 BYTE OF GAP 




DELAY 11 BYTES 



WRPTE.DATAAM 
ACCORDING TO AC FIELD ^•4— 

OF WRITE COMMAND 




TYPE II COMMAND 

Mark of the data field must be found within 30 bytes in 
single density and 43 bytes in double density of the last ID 
field ORG byte; if not, the ID field is searched for and 
verified again followed by the Data Address Mark search. If 
after 5 revolutions the DAM cannot be found, the Record 
Not Found status bit is set and the operation is terminated. 
When the first character or byte of the data field has been 
shifted through the DSR, it is transferred to the DR, and 
DRQ is generated. When the next byte is accumulated in 
the DSR, it is transferred to the DR and another DRQ Is 
generated. If the Computer has not read the previous 
contents of the DR before a new character is transferred 
that character is lost and the Lost Data Status bit is set. 
This sequence continues until the complete data field has 
been inputted to the computer. If there is a CRC en-or at the 
end of the data field, the CRC error status bit is set, and the 
command is terminated (even if it is a multiple record 
command). 

At the end of the Read operation, the type of Data Address 
Mark encountered in the data field is recorded in the Status 
Register (Bit 5) as shown: 



STATUS 
BITS 



Deleted Data Mark 
Data Mark 



1 



WRITE SECTOR 

* Upon receipt of the Write Sector command, the head Is 
loaded (HLD active) and the Busy status bit is set. When an 
ID field is encountered that has the correct track number, 
correct sector number, correct side number, and correct 
CRC, a DRQ is generated. The FD179X counts off 11 bytes 
in single density and 22 bytes in double density from the 
CRC tield and the Write Gate (WG) output is made active If 
the DRQ is serviced (i.e., the DR has been loaded by the 
computer). If DRQ has not been serviced, the command is 
tenninated and the Lost Data status bit is set. If the DRQ 
has been sen^iced, the WG is made active and six bytes of 
zeroes In single density and 12 bytes in double density are 
then written on the disk. At this time the Data Address 
Mark is then written on the disk as determined by the ^K) 
field of the command as shown below: 



ao 



Data Address Mark (Bit 0) 



1 Deleted Data Mark 

Data Mark 

The FD179X then writes the data field and generates DRQ's 
to the computer. If the DRQ is not serviced in time for 
continuous writing the Lost Data Status Bit is set and a 
byte of zeroes is written on the disk. The command is not 
terminated. After the last data byte has been written on the 
disk, the two-byte CRC is computed internally and written 
oh the disk followed by one byte of logic ones in FM or in 
MFM. The WG output is then deactivated. For a 2 MHz 
clock the INTRQ will set 8 to 12/isec after the last CRC byte 
is written. For partial sector writing, the proper method is to 
write the data and fill the balance with zeroes. By letting the 
chip fill the zeroes, errors may be masked by the lost data 
status and improper CRC Bytes. 

FyPE III COMMANDS 

READ ADDRESS 

Upon receipt of the Read Address command, the head 
is loaded and the Busy Status Bit Is set. The next 
encountered ID field is then read in from the disk, and 
the six data bytes of the ID field are assembled and 
transferred to the DR, and a DRQ is generated for each 
byte. The six bytes of the ID field are shown below: 



TRACK 
ADDR 


SIDE 
NUMBER 


SECTOR 
ADDRESS 


SECTOR 
LENGTH 


CRC 
1 


CRC 
2 


1 


2 


3 


4 


5 


6 



Although the CRC characters are transferred to the 
computer, the FD179X checks for validity and the CRC 
en-or status bit is set if there is a CRC error. The Track 
Address of the ID field is written into the sector 
register so that a comparison can be made by the 
user. At the end of the operation an intemipt is 
generated and the Busy Status is reset. 
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READ TRACK 

Upon receipt of the READ track command, the head is 
loaded, and the Busy Status bit is set. Reading starts with 
the leading edge of the first encountered index pulse and 
continues until the next index pulse. All Gap, Header, and 
data bytes are assembled and transferred to the data 
register and DRQ's are generated for each byte. The ac- 
cumulation of bytes is synchronized to each address mark 
encountered. An interaipt is genisrated at the completion of 
the command. 

This command has several characteristics which make it 
suitable for diagnostic purposes. Thsy are: the Read Gate 



is not activated during the command; no ORG checking is 
perfomned; gap information is included in the data stream; 
the internal side compare is not performed; and the ad- 
dress mark detector is on for the duration of the command. 
Because the A.M. detector is always on, write splices or 
noise may cause the chip to look for an A.M. If an address 
mark does not appear on schedule the Lost Data status flag 
is set. 

The ID A.M., ID field, ID CRC bytes, DAM, Data, and Data 
ORG Bytes for each sector will be correct. The Gap Bytes 
may be read incon^ectly during write-splice time because of 
synchronization. 



O 
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TYPE III COMMAND WRITE TRACK 



TYPE 111 COMMAND WRITE TRACK 
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CONTROL BYTES FOR INITIALIZATION 



DATA PATTERN 
IN DR (HEX) 


FD179X INTERPRETATION 


FD1 791/3 INTERPRETATION 
IN MFM (DUtN = 0) 


IN FM(DDEN = 1) 


00 thru F4 

F5 

F6 

F7 

F8 thru FB 

FC 

FD 

FE 

FF 


Write 00 thru F4 with CLK = FF 

Not Allowed ^ 

Not Allowed 

Generate 2 CRC bytes 

Write F8 thru FB, Clk = C7, Preset CRC 

Write FC with Clk = D7 

Write FD with Clk = FF 

Write FE, Clk = C7, Preset CRC 

Write FF with Clk = FF 


Write 00 thru F4, in MFM 
Write A1* in MFM, Preset CRC 
Write C2** in MFM 
Generate 2 CRC bytes 
Write F8 thru FB, in MFM 
Write FC in MFM 
Write FD in MFM 
Write FE in MFM 
Write FF in MFM 



'Missing c1o€i< transition between bits 4 and 5 



^^Misslng ciock transition between bits 3 & 4 



WRITE TRACK FORMATTING THE DISK 

(Refer to section on Type \\\ commands for flow diagmms.) 

Formatting the disk is a lelativeiy simpie task when 
operating pfogfammed IfO or when operating under DMA 
with a iarge amount of memory. Data and gap infomnation 
must be provided at the computer interface. Formatting the 
disk Is accompiished by positioning the RAW head over the 
desired track number and issuing the Write Track com- 
mand. 

Upon receipt of the Write Track command, the head is 
loaded and the Busy Status bit is set. Writing starts with 
the ieadfng edge of the first encountered index pufse and 
continues until the next index pulse, at which time the 
Interrupt Is activated. The Data Request Is activated im- 
mediately upon receiving the command, but writing will not 
start until after the first byte has been loaded Into the Data 
Register If the DR has not been loaded by the time the 
index pulse is encountered the operation is tenntnated 
making the device Not Busy, the Lost Data Status Bit is set, 
and the intemjpt is activated. If a byte is not present In the 
DR when n&Bdefi, a byte of zeroes is substituted. 

This sequence continues from one index mark to the next 
index mark. Normally, whatever data pattern appears In the 
data register is written on the disk with a normal clock 
pattern. However, If the FD179X detects a data pattern of 
F5 thru FE In the data register, this Is interpreted as data 
address marits with missing clocks or CRC generation. 

The CRC generator Is initialized when any data byte from 
PS to FE Is about to be transferred from the DR to the OSR 
In FM or by receipt of F5 In MFM. An F7 pattern will 
generate two CRC characters in FM or MFM* As a con- 
sequence, the patterns F5 thru FE must not appear in the 
Oaps, data fields, or ID fields. Also, CRC's must be 
generated by an F7 pattern. 

Disks may be tomaatted In IBM 3740 or System 34 formats 
with sector lengths of 128, 256, 51 2, or 1024 bytes. 



TYPE IV COMMANDS 

The Forced Intemipt command is generally used to ter- 
minate a multiple sector read or write command, or to In- 



sure Type I status in the status register. This command can 
be loaded into the command register at any tima If there is 
a cunBnt Command under execution (busy status btt set) 
the command will be temninated and the busy status bit 
reset. 

The lower four bits of the command detemilne the con* 
ditional interrupt as follows: 

■o = Not-Ready to Ready Transition 

h = Ready to Not'Ready Transition 
l2 = Every Index Pulse 
'3 = Immediate Interrupt 

The conditional Interrupt is enabled when the cor- 
responding bit positions of the command (I3 - 'O) are set to 
a 1. Then, when the condition for intenupt is met. the IN- 
TRQ line will go high signifying that the condition specified 
has occuned. If ^3 - 'o are all set to zero (HEX DO), no In- 
tenupt will occur but any command presently under 
execution will be immediately terminated When using the 
immediate interrupt condition (I3 = 1) an Interrupt will be 
immediately generated and the current command ter- 
minated. Reading the status or writing to the command 
register will not automatically clear the intenupt. The HEX 
DO is the only command that will enable the immediate 
intenrupt (HEX D8) to clearon a subsequent load command 
register or read status register operation. Follow a HEX D8 
with DO command 

Wait 8 micro sec (double density) or 16 micro sec (single 
density before issuing a new command after issuing a 
forced Interrupt (times double when ciock = 1 MHz). 
Loading a new command sooner than this will nullify the 
forced intemjpt. 

Forced intemjpt stops any command at the end of an in- 
ternal mJcFo-instnjction and generates INTRQ when the 
specified condition Is met. Forced intermpt wilt wait until 
ALU operations in progress are complete (CRC 
calculations, comparas, etc.). 

More than one condition may be set at a time. If for 
example, the READY TO NOT^READY condition (ll = 1) 
and the Every Index Pulse ('2 = 1) are both set, the 
rasultant command would be HEX "DA". The "OR" func- 
tion Is performed so that either a READY TO NOT* READY 
or the next Index Pulse will cause an intenrupt condition. 
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NO 



INTRQ 
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NO 



'If TEST= f NO DELAY 
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READ TRACK 
SEQUENCE 
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SHIFT ONE BIT 
INTO DSR 



TRANSFER 
DSR TO DR 
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TYPE III COMMAND 

Read Track/Address 




J SET INTRO ^ 
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SET LOST 
DATA BIT 
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READ ADDRESS 
SEQUENCE 



RESET BUSY 
SET INTRQ 
SETRNF 



1 






^ 


YES 


NO 






SHIFT 1 BYTE 
INTO DSR 


1 


' 


TRANSFER 
BYTE TO DR 






SET DRQ 


■< BYTES 


/E6 ^S^ 

BEEN ^- 



TRANSFER TRACK 

NUMBER TO SECTOR 

REGISTOR 




YES 



SET CRC 
ERROR BIT 



c 



SET INTRQ 
RESET BUSY 



3 



TYPE III COMMAND 

Read Track/Address 



STATUS REGISTER 

Upon receipt of any command, except the Force Interrupt 
command, the Busy Status bit is set and the rest of the 
status bits are updated or cieared for the new command. If 
the Force Interrupt Command is received when there is a 
current command under execution, the Busy status bit is 
reset, and the rest of the status bits are unchanged. If the 
Force Intemjpt command is received when there is not a 
current command under execution, the Busy Status bit is 
reset and the rest of the status bits are updated or cleared. 
In this case, Status reflects the Type I commands. 

The user has the option of reading the status register 
through program control or using the DRQ line with DMA or 
interrupt methods. When the Data register is read the DRQ 
bit in the status register and the DRQ line are automatically 
reset. A write to the Data register also causes both DRQ's 
to reset. 

The busy bit in the status may be monitored with a user 
program to detemnine when a command Is complete, in 
lieu of using the INTRQ line. When using the INTRQ, a busy 
status check is not recommended because a read of the 
status register to detemnine the condition of busy will reset 
the INTRQ line. 



The format of the Status Register is shown tjelow: 



(BITS) 1 


7 


6 


5 


4 


3 


2 


1 





S7 


S6 


S6 


S4 


S3 


S2 


SI 


so 



Status varies according to the type of command executed 
as shown in Table 4. 

Because of internal sync cycles, certain time delays must 
be observed when operating under programmed I/O. They 
are: (times double when clock = 1 MHz) 



Operation 


Next Operation 


Delay Req'd. 
FM 1 MFM 


Write to 
Command Reg. 


Read Busy Bit 
(Status Bit 0) 


12^8 1 6ms 


Write to 
Command Reg. 


Read Status 
Bits 1-7 


28hS 1 14^8 


Write Any 
Register 


Read From Diff. 
Register 


[ 



IBM 3740 FORMAT - 128 BYTES/SECTOR 

Shown below is the IBM singie^lensity format with 128 
bytes/sector. In order to format a diskette, the user must 
issue the Write Track command, and load the data register 
with the following values. For every byte to be written, there 
is one Data Request. 
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IBM 3740 FORMAT - 128 BYTES/SECTOR 

Shown below is the IBM single-density format with 128 
bytes/sector. In order to format a diskette, the user must 
issue the Write Track command, and load the data register 
with the following values. For every byte to be written, there 
is one Data Request. 



IBM SYSTEM 34 FORMAT- 256 BYTES/SECTOR 

Shown below is the IBM dual-density fonnat with 256 
bytes/sector In order to format a diskette the user must 
issue the Write Track command and load the data register 
with the following values. For every byte to be written, there 
i§ one data request. 



NUMBER 
OF BYTES 



HEX VALUE OF 
BYTE WRITTEN 



40 
6 
1 

26 



6 

1 
1 
1 
1 
1 
1 

11 

6 

1 

128 

1 

27 



247* 



FF(orOOV 

00 

FC (Index Mark) 

FF(orOO)^ 

00 

FE (ID Address Mark) 

Track Number 

Side Number (00 or 01) 

Sector Number (1 thru 1A) 

00 (Sector Length) 

F7 (2 CRC's written) 

FF(orOO)^ 

00 

FB (Data Address Mark) 

Data (IBM uses E5) 

F7 (2 CRC's written) 

FF(orOO)^ 

FF(orOO)^ 



NUMBER 
OF BYTES 



HEX VALUE OF 
BYTE WRITTEN 



80 
12 

3 

1 

50 



* Write bracketed field 26 times 
**Continue writing until FD179X interrupts out. 

Approx. 247 bytes. 
1-Optional '00' on 1795/7 only. 



12 
3 
1 
1 

1 

1 

1 

1 

22 

12 

3 

1 

256 

1 

54 



598* 



4E 

00 

F6 (Writes C2) 

FC (Index Mark) 

4E 

00 

F5 (Writes A1) 

FE (ID Address Mark) 

Track Number (0 thru 4C) 

Side Number (0 or 1) 

Sector Number (1 thru 1A) 

01 (Sector Length) 

F7 (2 CRCs written) 

4E 

00 

F5 (Writes A1) 

FB (Data Address Mark) 

DATA 

F7 (2 CRCs written) 

4E 

4E 



O 



*Wrlte bracketed field 26 times 
* Continue writing until FD179X interrupts out. 
Approx. 598 bytes. 



S? Bif'ES MFM 



PRE iHD£« 




IN MFM ONLY, IDAM AKO DATA AM 
ARE PRECEDED BY THREE SYTES OF 
A1 WrTH CLOCK TRANSITION BETWEEN 

errs 4 and 9 missing. 



y i?8v 



.... ^^ 
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1. NON-IBM FORMATS 

Variations in the IBM fomnats are possible to a limited 
extent if the following requirements are met: 

1) Sector size must be 128, 256, 512 or 1024 bytes. 

2) Gap 2 cannot be varied from the IBM format. 

3) 3 bytes of A1 must be used in MFM. 

In addition, the Index Address Mark is not required for 
operation by the FD179X. Gap 1, 3, and 4 lengths can be as 
short as 2 bytes for FD179X operation, however PLL lock up 
time, motor speed variation, write-splice area, etc. will add 
more bytes to each gap to achieve proper operation. It is 
recommended that the IBM format be used for highest 
system reliability. 





FM 


MFM 


Gapl 


16 bytes FF 


32 bytes 4E 


Gap 11 


11 bytes FF 


22 bytes 4E 


* 
* 


6 bytes 00 


12 bytes 00 
3 bytes A1 


Gap III** 


10 bytes FF 
4 bytes 00 


24 bytes 4E 
8 bytes 00 
3 bytes A1 


Gap IV 


16 bytes FF 


16 bytes 4E 



* Byte counts must be exact. 

**Byte counts are minimum, except exactly 3 bytes of A1 
must be written. 



- - 16- OR3?- uS- 



_r 



INTRQ ^ 



—m-\ 'service ■^— 



.© 



-TORfl 



FvOh 



Thld 



"•"SET 



-~^ ^DACC \^m— 



\- 



NOTE 1 CS MAYBE PERMANENTLY TIED LOW IF DESIRED 
'TIME DOUBLES WHEN CLOCK ' IMH/ 

t SERVICE (V/ORST CASEl 
■FM 27 5uS 

■MFM 13 5 uS 

DRO RISING EDGE: INDICATES THAT THE DATA REGISTER HAS ASSEMBLED 

DATA. 

DRQ FALLING EDGE: INDICATES THAT THE DATA REGISTER WAS READ 

INTRQ RISING EDGE: OCCURS AT END OF COMMAND 

INTRQ FALLING EDGE: INDICATES THAT THE STATUS REGISTER WAS READ. 



READ ENABLE TIMING 



TIMING CHARACTERISTICS 

Ta = QOC to 700C, Vdd = + 12V ± .6V, Vss = OV, Vcc =+5V ± ,25V 
READ ENABLE TIMING (See Note 6, Page 21) 



SYMBOL 


CHARACTERISTIC 


MIN. 


TYP. 


MAX. 


UNITS 


CONDITIONS 


TSET 


Setup ADDR & CS to RE 


50 






nsec 




THLD 


Hold ADDR & CS from RE 


10 






nsec 




TRE 


RE Pulse Width 


400 






nsec 


Cl = 50 pf 


TDRR 


DRQ Reset from RE 




400 


500 


nsec 




TIRR 


INTRQ Reset from RE 




500 


3000 


nsec 


See Note 5 


TDACC 


Data Access from RE 






350 


nsec 


Cl = 50 pf 


TDOH 


Data Hold From RE 


50 




150 


nsec 


Cl = 50 pf 



WRITE ENABLE TIMING (See Note 6, Page 21) 



SYMBOL 


CHARACTERISTIC 


MIN. 


TYP. 


MAX. 


UNITS 


CONDITIONS 


TSET 


Setup ADDR & CS to WE 


50 






nsec 




THLD 


Hold ADDR & CS from WE 


10 






nsec 




TWE 


WE Pulse Width 


350 






nsec 




TDRR 


DRQ Reset from WE 




400 


500 


nsec 




TIRR 


INTRQ Reset from WE 




500 


3000 


nsec 


See Note 5 


TDS 


Data Setup to WE 


250 






nsec 




TDH 


Data Hold from WE 


70 






nsec 
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[-• Tqhr 


















ORG 












1 
1 




— T,RH- -- -^ 


■NTfio ^ 








-O 




'SERVICE m- 


'fHLO 












WE — : 








TSET 










DATA MUST 
BE VALID 










1 




tds. 


^ 


1 




"^ 


Tdh|-«- 


t SERVICE (WORST 
•FM 23 5 uS 
'MFM ^^b^lS 


NOTE 1 CS MAY BE PERMANENTLY TIED LOW IF DESIRED 

2 WHEN WRITING DATA INTO SECTOR TRACK OR DATA 
REGISTER USER CANNOT READ THIS REGISTER UNTIL 
AT LEAST 4 uSEC IN MFM AFTER THE RISING EDGE OF WE 
^.^^ WHEN WRITING INTO THE COMMAND REGISTER STATUS 
CASEl IS MOT VALID UNTIL SOME 28 fiSEC IN FM. 14 pSEC IN MFM 
LATER. THESE TIMES ARE DOUBLED WHEN CLK 1 MHz 
■TIME DOUBLES WHEN CLOCK 1MHz 




DRQ RISING EDGE INDICATES THAT THE DATA REGISTER IS EMPTY 
DRQ FALLING EDGE: INDICATES THAT THE DATA REGISTER IS LOADED 
INTRO RISING EDGE: INDICATE THE END OF A COMMAND 
INTRO FALLING EDGE: INDICATES THAT THE COMMAND REGISTER 




IS WRITTEN TO 



u 



\~ 




O 





















NOMINAL 




MODE 




CLK 


T. 


T. 


Tc 


DISKETTE 


DDEN 


8" 


MFM 





2 MHz 


1 ^s 


^ US 


2 ns 


8" 


FM 


1 


2 MHz 


2 ^s 


2mS 


4 MS 


5^' 


MFM 





1 MHz 


ZA.S 


2mS 


4 /Lts 


5" 


FM 


1 


1 MHz 


4 fiS 


4 /iS 


8 fxs 



INPUT DATA TIMING 



WRITE ENABLE TIMING 
INPUT DATA TIMING: 



SYMBOL 


CHARACTERiSTiC 


MIN. 


TYP. 


MAX. 


UNITS 


CONDITIONS 


Tpw 

tbc 

Tc 

Txi 

TX2 


Raw Read Pulse Width 


100 

1500 

1500 

40 

40 


200 

2000 
2000 




nsec 
nsec 
nsec 
nsec 
nsec 


See Note 1 
1800 ns @70°C 
1800 ns@70"C 
See Note 1 
See Note 1 


Raw l=iead Cycle Time 
RCLK Cycle Time 


RCLK hold to Raw Read 


Raw Read hold to RCLK 



WRITE DATA TIMING: (ALL TIMES DOUBLE WHEN CLK = 1 MHz) (See Note 6, Page 21) 



SYMBOL 


CHARACTERISTICS 


MIN. 


TYP. 


MAX. 


liNITS 


CONDITIONS 


Twp 


Write Data Pulse Width 




500 


650 


nsec 


FM 








200 


350 


nsec 


MFM 


Twg 


Write Gate to Write Data 




2 

1 




^tsec 
fjLsec 


FM 
MFM 


Tbc 


Write data cycle Time 




2,3, or 4 




/usee 


±CLK Error 


Ts 


Early (Late) to Write Data 


125 






nsec 


MFM 


Th 


Early (Late) From 
Write Data 


125 






nsec 


MFM 


Twf 


Write Gate off from WD 




2 

1 




fxsec 
fxsec 


FM 
MFM 


Twdl 


WD Valid to Clk 


100 
50 






nsec 
nsec 


CLK=1 MHZ 
CLK=2 MHZ 


Twd2 


WD Valid after CLK 


100 
30 






nsec 
nsec 


CLK=1 MHZ 
CLK=2 MHZ 
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CLK 
ODEN = 



.~L 



L. 



^^ 



1 



^??^ 



CLK 
C2MKZ3 
{DDEN - 



n 



WD 



fe^^^ t^^^^ 



Twdi 



WO MUST HAVE RISING EDGE IN FrRST SHADED AREA AND TRAILING 
EfXaE IN SECOND SHADED AREA. 



VmiTE OATA^CLOCK RELATfONSHIP 



H \ w~ 



WRITE DATA TIMING 



MISCELLANEOUS TIMING: (Times Double When Clock = 1 MH^ (SeeNote6,Page21) 



SYMBOL 


CHARACTERISTIC 


MIN. 


TYP. 


MAX, 


UNITS 


CONDITIONS 


TCDr 


Clock Duty (low) 


230 


250 


20000 


nsec 




TCDa 


Clock Duty (high) 


200 


250 


20000 


nsec 




TSTP 


Step Pulse Output 


2or4 






(isec 


See Note 5 
± CLK ERROR 


TDIR 
TMR 


DIr Setup to Step 
Master Reset Pulse Width 


50 


12 




fisec 


TIP 


Index Pulse Width 


10 






Msec 


See Note 5 


TWF 


Write Fault Pulse Width 


10 






Msec 
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NOTES: 

1. Pulse width on RAW READ (Pin 27) is normally 
100-300 ns. However, pulse may be any width if 
pulse is entirely within window. If pulse occurs in both 
windows, then pulse width must be less than 300 ns 

,for MFM at CLK = 2 MHz and 600 ns for FM at 2 
MHz. Times double for 1 MHz. 

2. A PPL Data Separator Is recommended for 8" MFM. 

3. tbc should be 2 fxs, nominal in MFM and 4 fxs nominal 
in FM. Times double when CLK = 1 MHz. 

4. RCLK may be high or low during RAW READ (Polarity 
is unimportant). 

5. Times double when clock = 1 MHz. 

6. Output timing readings are at Vol = 0.8v and Voh = 
2.0v. 



MISCELLANEOUS TIMING 

•FROM STEP RATE TABLE 

Table 4. STATUS REGISTER SUMMARY 





ALL TYPE 1 


READ 


READ 


READ 


WRITE 


WRITE 


BIT 


COMMANDS 


ADDRESS 


SECTOR 


TRACK 


SECTOR 


TRACK 


S7 


NOT READY 


NOT READY 


NOT READY 


NOT READY 


NOT READY 


NOT READY 


S6 


WRITE 
PROTECT 











WRITE 
PROTECT 


WRITE 
PROTECT 


S5 


HEAD LOADED 





RECORD TYPE 





WRITE FAULT 


WRITE FAULT 


S4 


SEEK ERROR 


RNF 


RNF 





RNF 





S3 


CRC ERROR 


CRC ERROR 


CRC ERROR 





CRC ERROR 





S2 


TRACK 


LOST DATA 


LOST DATA 


LOST DATA 


LOST DATA 


LOST DATA 


S1 


INDEX PULSE- 


DRQ 


DRQ 


DRQ 


DRQ 


DRQ 


SO 


BUSY 


BUSY 


BUSY 


BUSY 


BUSY 


BUSY 



i 



STATUS FOR TYPE I COMMANDS 



BIT NAME 


MEANING 


87 NOT READY 


This bit when set indicates the drive Is not ready. When reset It indicates that the drive 
is ready. This bit is an inverted copy of the Ready input and logically 'ored' with MR. 


86 PROTECTED 


When set, indicates Write Protect Is activated. This bit is an inverted copy of WRPT 
Input. 


85 HEAD LOADED 


When set. it indicates the head is loaded and engaged. This bit is a logical "and" of 
HLD and HLT signals. 


84 SEEK ERROR 


When set, the desired track was not verified. This bit is reset to when updated. 


83 CRC ERROR 


CRC encountered in ID field. 


82 TRACK 00 


When set, Indicates Read/Write head is positioned to Track 0. This bit is an inverted 
copy of the TROO input. 


81 INDEX 


When set, indicates index mark detected from drive. This bit is an inverted copy of the 
IP input. 


SO BUSY 


When set command is In progress. When reset no command is in progress. 
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STATUS FOR TYPE II AND III COMMANDS 


BIT NAME 


MEANING 


87 NOT READY 


This bit when set indicates the drive is not ready. When reset, it Indicates that the drive 
is ready. This bills an inverted copy of the Ready input and 'ored' with MR. The Type II 
and III Commands will not execyte unless the drive is ready. 


86 WRITE PROTECT 


On Read Record: Not Used. On Read Track: Not Used. On any Write: It indicates a 
Write Protect. This bit is reset when updated. 


85 RECORD TYPE/ 
WRITE FAULT 


On Read Record: It indicates the record-type code from data field address mark. 
1 = Deleted Data Mark. = Data Mark. On any Write: It indicates a Write Fault. This bit 
is reset when updated. 


84 RECORD NOT 
FOUND (RNF) 


When set, it indicates that the desired track, sector, or side were not found. This bit is 
reset when updated. 


83 CRC ERROR 


If 84 is set, an error is found in one or more ID fields; othenwise it indicates error in 
data field. This bit is reset when updated. 


82 LOST DATA 


When set, it indicates the computer did not respond to DRQ in one byte time. This bit is 
reset to zero when updated. 


81 DATA REQUEST 


This bit is a copy of the DRQ output. When set, it indicates the DR is full on a Read 
Operation or the DR is empty on a Write operation. This bit is reset to zero when up- 
dated. 


SO BUSY 


When set, command is under execution. When reset, no command is under execution. 



ELECTRICAL CHARACTERISTICS 

Absolute Maximum Ratings 
Vdd with repect to Vss (ground): + 15 to - 0.3V 
Voltage to any Input with respect to Vss = + 15 to - 0.3V 
Ice = 60 MA (35 MA nominal) 
Idd = 15 MA (10 MA nominal) 



Gin & Gout = 15 pF max with all pins grounded except 

one under test. 
Operating temperature = 0''Cto70'*C 
Storage temperature = - SS'^C to + 125X 



OPERATING CHARACTERISTICS (DC) 

TA = 0"Gto70'C,VDD = + 12V ± .6V, Vss = OV,Vcc = + 5V ± .25V 



SYMBOL 


GHARAGTERISTIG 


MIN. 


MAX. 


UNITS 


CONDITIONS 


I.L 


Input Leakage 




10 


mA 


ViN = Vdo** 


lOL 


Output Leakage 




10 


^ 


VouT = Vdd 


VlH 


Input High Voltage 


2.6 




V 




ViL 


Input Low Voltage 




0.8 


V 




VOH 


Output High Voltage 


2.8 




V 


lo= -100^ 


Vol 


Output Low Voltage 




0.45 


V 


lo= 1.6 mA* 


Pd 


Power Dissipation 




0.6 


W 





*1792and 1794 lo = 1.0 mA 

**Leakage conditions are for input pins without intemai pull-up resistors. Pins 22, 23, 33, 36, and 37 have pull-up resistors. 
See Tech Memo #115 for testing procedures. 

See page 725 for ordering information. 
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INTRODUCTION 

Over the past several years, the Floppy Disk Drive has 
become the most popular on-line storage device for 
mini and microcomputer systems. Its fast access time, 
reliability and low cost-per-bit ratio enables the Floppy 
Disk Drive to be the solution in mass storage for mi- 
croprocessor systems. The drive interface to the Host 
system is standardized, allowing the OEM to substitute 
one drive for another with minimum hardware/ software 
modifications. 

Since Floppy Disk Data is stored and retrieved as a 
self-clocking serial data stream, some means of sep- 
arating the clock from the data and assembling this 
data in parallel form must be accomplished. Data is 
stored on individual Tracks of the metiia, requiring con- 
trol of a stepper motor to move the Read/Write head 
to a predetermined Track. Byte sychronization must 
also be accomplished to insure that the parallel data 
is properly assembled. After all the design considera- 
tions are met, the final controller can consist of 40 or 
more TTL packages. 

To alleviate the burden of Floppy Disk Controller de- 
sign, Western Digital has developed a Family of LSI 
Floppy Disk controller devices. Through its own set of 
macro commands, the FD179X Controller Family will 
perform all the functions necessary to read and write 
data to the drive. Both the 8" standard and SW mini- 
floppy are supported with single or double density re- 
cording techniques. The FD179X is compatible with 
the IBM 3740 (FM) data format, or the System 34 
(MFM) standards. Provisions for non-standard formats 
and variable sector lengths have been included to pro- 
vide more storage capability per track. Requiring stan- 
dard +5, +12 power supplies the FD179X is available 
in a standard 40 pin dual-in-line package. 

The FD179X Family consists of 6 devices. The 
differences between these devices is summarized in 
Figure 1. The 1792 and 1794 are "single density only" 
devices, with the Double Density Enable pin (DDEN) 
left open by the user. Both True and inverted Data bus 
devices are available. Since the 179X can only drive 
one TTL Load, a\true data bus system may use the 
1791 with externannverting buffers to arrive at a true 
bus scheme. The 1795 and 1797 are identical to the 
1791 and 1793, except a side select output has been 
added that is controlled through theCommand Register. 



SYSTEM DESIGN 

The first consideration in Floppy Disk Design is to die- 
termine which type of drive to use. The choice ranges 
from single-density single sided mini-floppy to the 8" 
double-density double-sided drive. Figure 2 illustrates 
the various drive and data capacities associated with 
each type. Although the 8" double-density drive offers 
twice as much storage, a more complex data separator 
and the addition of Write Precompensation circuits are 
mandatory for reliable data transfers. Whether to go 
with 8" double-density or not is dependent upon PC 
board space and the additional circuitry needed to ac- 
curately recover data with extreme bit shifts. The byte 
transfer time defines the nominal time required io 
transfer one byte of data from the drive. If the CPU 
used cannot service a byte in this time, then a DMA 
scheme will probably be required. The 179X also needs 
a few microseconds for overhead, which is subtracted 
from the transfer time. Figure 3 shows the actual ser- 
vice times that the CPU must provide on a byte-by-byte 
basis. If these times are not met, bytes of data will be 
lost during a read or write operation. For each byte 
transferred, the 179X generates a DRQ (Data Re- 
quest) signal on Pin 38. A bit Is provided in the status 
register which is also set upon receipt of a byte from 
the Disk. The user has the option of reading the status 
register through program control or using the DRQ Line 
with DMA or interrupt schemes. When the data register 
is read, both the status register DRQ bit and the DRQ 
Line are automatically reset. The next full byte will 
again set the DRQ and the process continues until the 
sector(s) are read. The Write operation works^exactly 
the same way, except a WHlib to the uata negister 
causes a reset of both DRQ's. 



RECORDING FORMATS 

The FD179X accepts data from the disk in a Fre- 
quency-Modulated (FM) or Modified-Frequency-Mod- 
ulated (MFM) Format. Shown in Figures 4A and 4B are 
both these Formats when writing a Hexidecimal byte 
of 'D2'. In the FM mode, the 8 bits of data are broken 
up into "bit cells." Each bit cell begins with a clock 
pulse ^nd the center of the bit cell defines the data. If 
the data bit = 0, no pulse is written; if the data = 1, 
a pulse is written in the center of the cell. For the 8" 
drive, each clock is written 4 microseconds apart. 
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In the MFM mode, clocks are decoded into the data 
stream. The byte is again broken up into bit cells, with 
the data bit written in the center of the bit cell if data 
= 1. Clocks are only written if both surrounding data 
bits are zero. Figure 4B shows that this occurs only 
once between Bit cell 4 and 5. Using this encoding 
scheme, pulses can occur 2, 3 or 4 microseconds 
apart. The bit cell time is now 2 microseconds; twice 
as much data can be recorded without increasing the 
Frequency rate due to this encoding scheme. 

The 1 79X was designed to be compatible with the IBM 
3740 (FM) and System 34 (MFM) Formats. Although 
most users do not have a need for data exchange with 
IBM mainframes, taking advantage of these well stud- 
ied formats will insure a high degree of system 
performance. The 179X will allow a change in gap 
fields and sector lengths to increase usable storage 
capacity, but variations away from these standards is 
not recommended. Both IBM standards are soft-sector 
format. Because of the wide variation in address marks, 
the 179X can only support soft-sectored media. Hard 
sectored diskettes have continued to lose popularity, 
mainly due to the unavailability of a standard and the 
limitation of sector lengths imposed by the physical 
sector holes in the diskette. 



PROCESSOR INTERFACE 

The Interface of the 179X to the CPU consists of an 
8-bit Bi-directional bus, read/write controls and optional 
interrupt lines. By selecting the device via the CHIP 
SELECT Line, each of the five internal registers can 
be accessed. 



Shown below are the registers and their addresses: 



PINS 


PIN 6 


PINS 


PIN 4 


PIN 2 


CS 


A, 


Ao 


RE^ 


WE^ 











STATUS REG 


COMMAND 








1 


TRACK REG 


REG 





1 





SECTOR REG 


TRACK REG 





1 


1 


DATA REG 


SECTOR REG 


1 


X 


X 


H1-Z 


DATA REG 
H1-Z 



The Ao, Ai, Lines used for register selections can be 
configured at the CPU in a variety of ways. These lines 
may actually tie to CPU address lines, in which case 
the 179X will be memory-mapped and addressed like 
RAM. They may also be used under Program Control 
'by tying to a port device such as the 8255, 6820, etc. 
As a diagnostic tool when checking out the CPU in- 
terface, the Track and Sector registers should respond 
like "RAM" when the 179X is idle (Busy = INTRQ = 
0). 

Because of internal synchronization cycles, certain 
time delays must be introduced when operating under 
Programmed I/O. The worst case delays are: 



OPERATION 


NEXT 
OPERATION 


DELAY REQ'D 


WRITE TO 
COMMAND REG 


READ STATUS 
REGISTER 


MFM = IVs* 
FM = 28/LiS. 


WRITE TO 
ANY REGISTER 


READ FROM A 
DIFFERENT REG 


NO DELAY 



*NOTE: Times Double when CLK = 1MHz {SVa" drive) 



Other CPU interface lines are CLK, MR and DDEN. 
The CLK line should be 2MH2 (8" drive) or 1MHz (5V4" 
drive) with a 50% duty cycle. Accuracy should be ±1% 
(crystal source) since all internal timing, including step- 
ping rates, are based upon this clock. 
The MR or Master Reset Line should be strobed a 
minimum of 50 microseconds upon each power-on 
condition. This line clears and initializes all internal reg- 
isters and issues a restore command (Hex '03') on the 
rising edge. A quicker steppin g rat e can be written to 
the command register after a MR, in which case the 
remaining steps will occur at the faster programmed 
rate. The 179X will issue a maximu m of 25 5 stepping 
pulses in an attempt to expect the TROO line to go 
active l ow. This line should be connected to the drive's 
TROO sensor. 



The DDEN line causes selection of either singl e den- 
sity (DDEN = 1) or double density operation. DDEN 
should not be switched during a read or write operation. 



Each time a command is issued to the 179X, the Busy 
bit is set and the INTRQ (Interrupt Request) Line is 
reset. The user has the option of checking the busy bit 
or use the INTRQ Line to denote command comple- 
tion. The Busy bit will be reset whenever the 179X is 
idle and awaiting a new command. The INTRQ Line, 
once set, can only be reset by a READ of the status 
register or issuing a new command. The MR (Master 
Reset) Line does not affect INTRQ. 
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FLOPPY DISK INTERFACE 

The Floppy Disk Interface can be divided into three 
sections: Motor Control, Write Signals and Read Sig- 
nals. All of these lines are capable of driving one TTL 
load and not compatible for direct connection to the 
drive. Most drives require an open-collector TTL inter- 
face with high current drive capability. This must be 
done on all outputs from the 179X. Inputs to the 179X 
may be buffered or tied to the Drives outputs, providing 
the appropriate resistor termination networks are used. 
Undershoot should not exceed -0.3 volts, while integ- 
rity of ViH and Vqh levels should be kept within spec. 

MOTOR CONTROL 

Motor Control is accomplished by the STEP and DIRC 
Lines. The STEP Line issues stepping pulses with a 
period defined by the rate field in all Type I commands. 
The DIRC Line defines the direction of steps (DIRC = 
1 STEP IN/DIRC = STEP OUT). 

Other Control Lines include the IP or Index Pulse. This 
Line is tied to the drives* Index L.E.D. sensor and 
makes an ac tive tra nsition for each revolution of the 
diskette. The TROO Line is another L.E.D. sensor that 
informs the 179X that the stepper motor is at its fur- 
thest position, over Track 00. The READY Line can be 
used for a number of functions, such as sensing "door 
open". Drive motor on, etc. Most drives provide a pro- 
grammable READY Signal selected by option jumpers 
on the drive. The 1 79X will look at the ready signal prior 
to executing READ/WRITE commands. READY is no? 
inspected during any Type I commands. All Type I 
commands will execute regardless of the Logic Level 
on this Line. 

WRITE SIGNALS 

Writing of data is accomplished by the use of the WD, 
WG, WF, TG43, EARLY and LATE Lines. The WG or 
Write Gate Line is used to enable write current at the 
drive's P„^W head. It is made active prior to writing data 
on the disk. The WF or WRITE FAULT Line is used to 
inform the 179X of a failure in drive electronics. This 
signal is multiplexed with the VFOE Line and must be 
logically separated if required. Figure 5 illustrates three 
methods of demultiplexing. 

The TG43 or "TRACK GREATER than 43" Line is 
used to decrease the Write current on the inner tracks, 
where bit densities are the highest. If not required on 
the drive, TG43 may be left open. 

WRITE PRECOMPENSATION 

The 179X provides three signals for double density 
Write Precompensatlon use. These signals are WRITE 
DATA, EARLY and LATE. When using single density 
drives (eighter 8" or 5V4"), Write Precompensatlon is 
not necessary and the WRITE DATA line is generally 
TTL Buffered and sent directly to the drive. In this 
mode, EARLY and LATE are left open. 

For double density use, Write Precompensatlon is a 
function of the drive. Some manufacturers recommend 
Precompensating the 5V4" drive, while others do not. 



With the 8" drive, Precompensatlon may be specified 
from TRACK 43 on, or in most cases, all TRACKS. If _ 
the recommended Precompensatlon is not specified, q 
check with the manufacturer for the proper configura- ^ 
tion required. 2 

The amount of Precompensatlon time also varies. A X 
typical value will usually be specified from 100-300ns. 
Regardless of the parameters used. Write Precom- 
pensat ion must be done external to the 179X. When 
DDEN is tied low, EARLY or LATE will be activated at 
least 125ns. before and after the Write Data pulse. An 
Algorithm internal the 179X decides whether to raise 
EARLY or LATE, depending upon the previous bit pat- 
tern sent. As an example, suppose the recommended 
Precomp value has been specified at 150ns. The fol- 
lowing action should be taken: 



EARLY LATE 



ACTION TAKEN 



delay WD by 150ns (nominal) 
1 delay WD by 300ns (2X value) 
1 do not delay WD 

There are two methods of performing Write 
Precompensatlon: 

1) External Delay elements 

2) Digitally 

Shown in Figure 6 is a Precomp circuit using the West- 
ern Digital 2143 clock generator as the delay element. 
The WD pulse from the 179X creates, a strobe to the 
2143, causing subsequent output pulses on the^l ,^2 
and J03 signals. The 5K Precomp adjust sets the de- 
sired Precomp value. Depending upon the condition of 
EARLY and LATE, 01 will be used for EARLY, 02 for 
nominal (EARLY - LATE = 0), andjer3 for LATE. The 
use of "one-shots" or delay line in a Write Precom- 
pensatlon scheme offers the user the ability to vary the 
Precomp value. The 04 output resets the 74LS175 
Latch in anticipation of the next WD pulse. Figure 7 
shows the WD-EARLY/LATE relationship, while Figure 
8 shows the timing of this write Precomp scheme. 

Another method of Precomp is to perform the function 
digitally. Figure 9 illustrates a relationship between the 
WD pulse and the CLK pin, allowing a digital Precomp 
scheme. Figure 10 shows such a scheme with a pre- 
set Write Precompensatlon value of 250ns. The syn- 
chronous counter is used to generate 2MH2 and 4MHz 
clock signals. The 2MHz clock is sent to the CLK input 
of the 179X and the 4MHz is used by the 4-bit shift 
register. When a WD pulse is not present, the 4MHz 
clock is shifting "ones" through the shift register and 
maintaining Go at a zero level. When a WD pulse is 
present, a zero is loaded at either A, B, or C depending 
upon the states of LATE, EN PRECOMP and EARLY. 
The zero is then shifted by the 4MHz clock until it 
reaches the Go output. The number of shift operations 
determines whether the WRITE DATA pulse is written 
early, nominal or late. If both FM and MFM operations 
is a system requirement, the output of this circuit should 
be disabled and the WD pulse should be sent directly 
to the drive. 
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DATA SEPARATION 

The 179X has two inputs (RAW READ & RCLK) and 
one output (VFOE) for use by an external data sepa- 
rator. The RAW READ input must present clock and 
data pulses to the 179X. while the RCLK input provides 
a "window" or stroJDe signal to clock each RAW READ * 
pulse into the device. An ideal Data Separator would 
have the leading edge of the RAW READ pulse occur 
in the exact center of the RCLK strobe. 
Motor Speed Variation, Bit shifts and read amplifier 
recovery circuits all cause the RAW READ pulses to 
drift away from their nominal positions. As this occurs, 
the RAW READ pulses will shift left or right with re- 
spect to RCLK. Eventually, a pulse will make its tran- 
sition outside of its RCLK window, causing either a 
CRC error or a Record-not-Found error at the 179X, 
A Phase-Lock-Loop circuit is one method of achieving 
synchronization between the RCLK and RAW READ 
signals. As RAW READ pulses are fed to the PLL, 
minor adjustments of the free-running RCLK frequency 
can be made. If pulses are occurring too far apart, the 
RCLK frequency is decreased to keep synchroniza- 
tion, ff pulses begin to occur closer together, RCLK is 
fncreased until this new higher frequency Is achieved. 
In normal read operations, RCLK will be constantly 
adjusted in an attempt to match the incoming RAW 
READ frequency. 

Another method of Data Separation is the Counter- 
Separator technique. The RCLK signal fs again free- 
running at a nominal rate, until a RAW READ poise 
occurs. The Separator then denotes the position of the 
pulse with respect to RCLK {by the counter value), and 
counts down to increase or decrease the current RCLK 
window. The next RCLK window will occur at a nommal 
rate and will continue to run at this frequency until an- 
other RAW READ pulse adjusts RCLK. but only the 
present window Is adjusted. 

Both PPL and Counter/Separator are acceptable 
methods of Data Separation. The PPL has the highest 
reliability because of its "tracking" capability and is rec- 
ommended for 8" double density designs. 
As a final note, the term "Data Separator" may be 
misleading, since the physical separation of clock and 
data bjts are not actually performed. This term is used 
throughout the industry, and can better be described 
as a "Data Recovery Circuit" rather than a Data 
Separator, 

The VFOE signal rs an output from the 179X that sig- 
nifies the head has been loaded and valid data pulses 
are appearing on the RAW READ line. It can be used 
to enable the Data Separator and to insure clean RCLK 
transitions to the 179X. Since some drives will output 
random pulses when the head is disengaged, VFOE 
can prevent an erratic RCLK signal during this time. If 
the Data Separator requires synchronization during a 
known pattern of one's or zero's, then RG {READ 
GATE) can be used. The RG signal will go active when 
the 179X is currently over a field of zeros or ones- RG 
is not available on the 1795/1797 devices, since this 
signal was replaced with the SSO (Side Select Output) 
Line. 



Shown in Figure 1 1 is a 2V2 IC Counter/Separator. The 
74LS193 free runs at a frequency determined by the 
CRYCLK input. When a RAW READ pulse occurs, the 
counter Is loaded with a starting count of 'S\ When the 
RAW READ Line returns to a Logic 1 , the counter 
counts down to zero and again free runs. The 74LS74 
insures a 50% duty cycle to the 179X and performs a 
divide-by-two of the Qd output. 

Figure 12 illustrates another Counter/Separator utiliz- 
ing a PROM as the count generator. Depending upon 
the RAW READ phase relationship to RCLK, the PROM 
is addressed and its data output is used as the counter 
value, A 16MHz clock is required for 8" double density, 
while an 8MHz clock can be used for single density. 
Figure 13 shows a Phase-Lock-Loop data recovery 
circuit. The phase detector (U2, Figure 2) compares 
the phase of the SHAPED DATA pulse to the phase 
of VFO CLK ^ 2. If VFO CLK -^ 2 is lagging the 
SHAPED DATA pulse an output pulse on #9, U2 is 
generated. The filter/amplifier converts this pulse into 
a DC signal which increases the frequency of the VCO. 

If, correspondingly, CLK 4- 2 is leading the SHAPED 

DATA pulse, an output pulse on #5, U2 Is generated. 
This pulse Is converted Into a DC signal which de- 
creases the frequency of the VCO, These two actions 
cause the VCO to track the frequency of the incorning 
READ DATA pulses. This correction process to keep 
the two signals in phase is constantly occurring because 
of spindle speed variation and circuit parameter 
variations. 

The operating specifications for this circuit are as 
follows: 



Free Running Frequency 


2MHz 


Capture Range 


± 15% 


Lock Up Time 


50 microsec. "1111" or 




^*0000" Pattern 




100 Microsec "1010" Pat- 




tern 



The RAW READ pulses are generated from the falling 
edge of the SHAPED DATA pulses. The pulses are 
also reshaped to meet the 179X requirements. VFO 
CLK -^ 2 OR 4 is divided by 2 once again to obtain 
VFO CLK OUT whose frequency is that required by the 
179X RCLK input RCLK must be controlled by VFOE 
so VFOE is sampled on each rising edge of VFO CLK 
OUT. When VFOE goes active EN RCLK goes active 
in synchronization with VFO CLK OUT preventing any 
glitches on the RCLK output. When VFOE goes inac- 
tive EN RCLK goes inactive in synchronization with 
VFO CLK OUT, again preventing any glitches on the 
RCLK output. 

Figure 14 illustrates a PPL data recovery circuit using 
the Western Digital 1691 Floppy Support device. Both 
data recovery and Write Precomp Logic is contained 
within the 1691, allowing low chip count and PLL re- 
liability. The 74S124 supplies the free-running VCO 
output. The PUMP UP and PUMP DOWN signals from 
the 1691 are used to control the 74S124*s frequency. 
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COMMAND USAGE 

Whenever a command is successfully or unsuccess- 
fully completed, the busy bit of the status register is 
reset and the INTRQ line is forced high. Command ter- 
mination may be detected either way. The INTRQ can 
be tied to the host processor's interrupt with an appro- 
priate service routine to terminate commands. The 
busy bit may be monitored with a user program and 
will achieve the same results through software. Per- 
forming both an INTRQ and a busy bit check is not 
recommended because a read of the status register to 
determine the condition of the busy bit will reset the 
INTRQ line. This can cause an INTRQ from not 
occurring. 

RESTORE COMMAND 

On some disk drives, it is possible to position the R/W 
head outward past Track 00 and prevent the TROD 
line from going low unless a STEP IN Is first performed. 
If this condition exists in the drive used, the RESTORE 
command will never detect a TROO. Issuing several 
STEP IN pulses before a RESTORE command will 
remedy this situation. The RESTORE and all other 
Type I commands will execute even though the READY 
bit indicates the drive is not ready (NOT READY = 1). 

READ TRACK COMMAND 

The READ TRACK command can be used to manually 
inspect data on a hard copy printout. Gaps, address 
marks and all data are brought in to the data register 
during this command. The READ TRACK command 
may be used to inspect diskettes for valid formatting 
and data fields as well as address marks. Since the 
179X does not synchronize clock and data until the In- 
dex Address Mark is detected, data previous to this ID 
mark will not be valid. READ GATE (RG) is not ac- 
tuated during this command. 

READ ADDRESS COMMAND 

In systems that use either multiple drives or sides, the 
read address command can be used to tell the host 
processor which drive or side is selected. The current 
position of the R/W head is also denoted in the six 
bytes of data that are sent to the computer. 



TRACK SIDE 


SECTOR 


CRS 
LENGTH 


CRC 

1 


CRC 
2 



The READ ADDRESS command as well as all other 
Type II and Type III commands will not execute if the 
READY line is inactive (READY = 0). Instead, an in- 
terrupt will be generated and the NOT READY status 
bit will be set to a 1 . 



FORCED INTERRUPT COMMAND 

The Forced Interrupt command is generally used to 
terminate a multiple sector command or to insure Type 
I status in the status register. The lower four bits of the 
command determine the conditional interrupt as follows; 



1o 

13 



NOT-READY TO READY TRANSITION 
READY TO NOT-READY TRANSITION 
EVERY INDEX PULSE 
IMMEDIATE INTERRUPT 



Regardless of the conditional Interrupt set, any com- 
mand that is currently being executed when the Forced 
Interrupt command is loaded will immediately be ter- 
minated and the busy bit will be reset indicating an idle 
condition. 

Then, when the condition for interrupt is met, the INTRQ 
line will go high signifying that the condition specified 
has occurred. 

The conditional interrupt is enabled when the corre- 
sponding bit positions of the command (I3 -!o) are set 
to a 1. If I3 -lo are all set to zero, no interrupt will occur, 
but any command presently under execution will be 
immediately terminated upon receipt of the Force In- 
terrupt command (HEX DO). 

As usual, to clear the interrupt a read of the status reg- 
ister or a write to the command register is required. 
The exception is when using the immediate interrupt 
condition (I3 = 1). If this command is loaded into the 
command register, an interrupt will be immediately 
generated and the current command terminated. 
Reading the status or writing to the command register 
will not automatically clear the interrupt; another forced 
interrupt command with I3 -Iq = must be loaded into 
the command register in order to reset the INTRQ from 
this condition. 

More than one condition may be set at a time. If for 
example, the READY TO NOT-READY condition (I1 = 
1) and the Every Index Pulse (I2 = 1) are both set, the 
resultant command would be HEX "DA'\ The "OR" 
function is performed so that either a READY TO NOT- 
READY or the next Index Pulse will cause an interrupt 
condition. 

DATA RECOVERY 

Occasionally, the R/W head of the disk drive may get 
"off track", arid dust or dirt may get trapped on the 
media. Both of these conditions will cause a RECORD 
NOT FOUND and/or a CRC error to occur. This "soft 
error" can usually be recovered by the following 
procedure: 

1 . Issue the command again 

2. Unload and load the head and repeat step 

3. Issue a restore, seek the track, and repeat step 1 



■n 

o 



If RNF or CRC errors are still occurring after trying 
these methods, a "hard error" may exist. This is usu- 
ally caused by improper disk handling, exposure to 
high magnetic fields, etc. and generally results in de- 
stroying portions or tracks of the diskette. 
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5 FIGURE 1. DEVICE CHARACTERISTICS 



DEVICE 


SNGL DENSITY 


DBLE DENSITY 


INVERTED BUS 


TRUE BUS 


DOUBLE-SIDED 


1791 


X 


X 


X 






1792 


X 




X 






1793 


X 


X 




X 




1794 


X 






X 




1795 


X 


X 


X 




X 


1797 


X 


X 




X 


X 



FIGURE 2. STORAGE CAPACITIES ^ <2> ~hte-eU. 
















UNFORMAIIbD 




FORMATTED 


SIZE 


DENSITY 


SIDES 


CAPACITY (NOMINAL) 


BYTE 

TRANSFER 

TIME 


CAPACITY 


PER TRACK 


PER DISK 


PER TRACK 


PER DISK 


51/4" 


SINGLE 


1 


3125 


109,375* 


64/Lis 


2304** 


80,640 


574" 


DOUBLE 


1 


6250 


218,750 


32fis 


4608*** 


161.280 


51/4" 


SINGLE 


2 


3125 


218,750 


64IJ.S 


2304 


161.280 


51/4" 


DOUBLE 


2 


6250 


437,500 


32jLis 


4608 


322.560 


8" 


SINGLE 


1 


5208 


401.016 


32ms 


3328 


256,256 


8" 


DOUBLE 


1 


10.416 


802,032 


16ms 


6656 


512.512 


8" 


SINGLE 


2 


5208 


802,032 


32/itS 


3328 


512.512 


8" 


DOUBLE 


2 


10,416 


1.604.064 


16/is 


6656 


1.025.024 



*Based on 35 Tracks/Side 
**Based on 18 Sectors/Track (128 byte/sec) 
**Based on 18 Sectors/Track (256 bytes/sec) 
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FIGURE 3. NOMINAL VS. WORSE CASE SERVICE TIME 



■n 



SIZE 


DENSITY 


NOMINAL TRANSFER* 
TIME 


WORST-CASE 179X SERVICE TIME 


READ 


WRITE 


51/4" 
5V4" 
8" 
8" 


SINGLE 
DOUBLE 
SINGLE 
DOUBLE 


64ms 
32ju.s 
32/Lis 

16/;lS 


55.0/xs 
27.5/xs 
27.5ms 
13.5ms 


47.0ms 
23.5mS 
23.5ms 
11.5ms 



FIGURE 4A. FM RECORDING 



HEX 

■D2' 



4^s 
BITO 

1 



BIT 2 



BITS 



BIT 7 



HJBll^RIS l R R R R m PF] 



RULE: 

1) WRITE DATA BITS AT CENTER 
OF BIT CELL IF A "1" 

2) WRITE CLOCK BITS AT LEADING 
EDGE OF THE BIT CELL 



FIGURE 4B. MFM RECORDING 





2ns 

1 1 


















BITO 


BIT 1 


BIT 2 


BITS 


BIT 4 




BITS 


BIT 6 


BIT? 




1 1 


1 










1 





HEX 
'02' 


R R 

RULE: 


R 




R 




_R 












1) WRITE DATA BITS AT CEMTER 
OF BIT CELL IF A -I" 
















2) WRITE CLOCK BITS AT LEADING 
EDGE OF BIT CELL IF: 
















A) NO DATA BIT HAS BEEN WRITTEN LAST 
— AND— 

B) NO DATA BIT WILL BE WRITTEN NEXT 
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FIGURE 5. WF/VFOE DEMULTIPLEXING CIRCUITRY 



-n 

D 



33 



•i>* 



PIN 33 USED AS A VFOE SIGNAL ONLY 



33 



179X 



^^^ 74LS01 



-oQwT; 



(WG TO DRIVE) 



-^ (WF FROM DRIVE) 



[^- 



• PIN 33 USED AS VFOE AND WF SIGNALS 







+5 

5 ^°^ 74LS01 






179X 


33 
30 


1 dr~ 




WG 




• \ 








-ONLY 




• PIN 33 USED AS A WF SIGNAl 



EARLY 
LATE 



1 iO^iDCL 



CLK 3D 
10 



4Q 



. 30 

)CLR 



7 C-LATE 



15 C-NOMINAL 






f 12 > 1— V^- 



5K 
A/s/s, — 

PRECQMP. 
ADJUST 



IN ^ 

j0a 



Jf4 



jg^W 



FIGURE 6. 179X WRITE PRE-COMP 



WD TO 
DRIVE 
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^ 2. 3. 4ms, ± CLK TOL ^ 






.... I 




L< — 200 NS ± 50 




* 




'mi . 2, AfiS ± CLK TOL ^ 

U*_ 500.NS ± 50 










WD 

EARLY 
OR LATE 

DOUBLE Tl 




n 


h_ 














t 

1 


n - 

OR LATE ^ 1 1^^ 


i 

n 


O 


'^ 


77 

MES FOR 5" (MINI-FLOPPY) / T 


\\ 




^^^^^"'^- 450 NS MIN. 


125 NS MIN. VALID 
FOR DURATION OF 
DOUBLE TIMES FOR 5" (MINI-FLOPPY) wD PULSE 




VALID BEFORE LEADING EDGE OF WD 


WRITE PRE-COMP TIMING FOR MFM 




WRITE PRE-COMP TIMING FOR FM 



FIGURE 7. WRITE PRE-COMP TIMING 
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FIGURE 8. PRECOMP TIMING FOR CIRCUIT IN FIGURE 6 
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500ns 



CLK 

@1MHz 



WD 
(DDEN = 0) 





9- 



\ 



\ 



s^lOOns sslOOns 



CLK 
@2MHz 



WD 
(DDEN = 0) 




FIGURE 9. WD/CLK RELATIONSHIP FOR WRITE PRECOMP USE 
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RAW READ > 
FROM DRIVE 



TO 




74123 



+5 >- 



10 



r* 



r 



LD 

A 

B Q^ 

C 

° CU 

CD c 



74L8193 



CRYCLK 



TYPE 


DDEN 


CRYCLK 1 


1 


e-FM 


1 


8MHz 


S*MFM 





8 MHz 


S-FM 


1 


4 MHz 



R. C = 150JNS ± 50 



D Q 



G Q 



27 



1791/1793 



RCLK 



RG 
DDEN 



I 



FIGURE 11. COUNTER/SEPARATOR 
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Refer to 179X-02 Floppy Disk Formatter/Controller ^ 

Family Data Sheet for Command, Timing and Status q 

Information. -^ 

See page 725 for ordering information. * X 
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Inlormation furnished by Western Digital Corporation is believed to be accurate and reliable. However, no responsibility is assumed by Western Digital 
Corporation for its use; nor for any infringements of patents or other rights of third parties which may result from Its use. No license is granted by 
implication or otherwise under any patent or patent rights of Western Digital Corporation. Western Digital Corporation reserves the right to change 
specifications at anytime without notice. 
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access 

The operation of seeking, reading or writing data on a storage unit (in this case, the 
diskette). 

access time 

The time that elapses between any instruction being given to access some data and 
that data becoming available for use. 

address 

An identification (number, name, or label) for a location in which data is stored 

alphanumeric (characters) 

A generic term for numeric digits and alphabetic characters. 

assembly language 

A machine-oriented language for programming mnemonics and machine readable 
code from the mnemonics. 



base 2 

The 'binary' numbering system consisting of more than one symbol, representing a 
sum, in which the individual quantity represented by each figure is based on a 
multiple of 2. 

base 10 

The 'decimal' numbering system — consisting of more than one symbol, representing 
a sum, in which the individual quantity represented by each symbol is based on a 
multiple of 10..... ....,..-^... , ., ...,;■.. .^- ■...-, .-r;----;-'. ::-.>■.>-,...■'— ^^ ■ - ■...■-■■■■.■.■-■ .■ ■ 
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base 16 

The 'hexadecimal' numbering system — consisting or more than one symbol 
representing a sum, in which the individual quantity represented by each symbol is 
based on a multiple of 16. 



bit 

A single 'binary' digit whose value is 'zero' or 'one'. 

buffer 

A small area of memory used for the temporary storage of data to be processed. 

byte 

Eight 'bits'. A 'byte' may represent any numerical value between '0' and '255'. 

command file 

A file consisting of a list of commands, to be executed in sequence. 

control code 

In programming, instructions which determine conditional jumps are often referred 
to as control instructions and the time sequence of execution of instructions is called 
the flow of control. 

CRC error 

Cyclic Redundancy Check A means of checking for errors by using redundant 
information used primarily to check disk I/O while verifying 

data type 

The form in which data is stored; Le., integer, single precision, double precision, 
'alphanumeric' character strings or 'strings'. 

DEC 

Initials for Directory Entry Code. 



device 

Any physical or logical contrivance capable of accepting, processing or supplying 
data. 

direct access 

Retrieval or storage of data by a reference to its location on a disk, rather than 
relative to the previously retrieved or stored data. 

DIRECT STATEMENT (IN FILE) 

A program statement that exists in the disk file that is not assigned a line number. 
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DIRECTORY 

A table giving the relationships between items of data. Sometimes a table or an 
index giving the addresses of data 

disk 

The small magnetic disk used to iStore logical data. 

disk drive 

The mechanical device that rotates, reads and writes to a diskette. 

displacement 

A specified number of sectors, at the top or beginning of the file, in which the 
'bookkeeping' and file parameters are stored for later use by various program 
modules. 

driver 

A routine that makes a particular device (usually hardware) work in a desired way. 

DUMP 

To transfer all or part of the contents of one section of computer memory or disk into 
another section, or to some other computer device. 

EOF 

Initials for 'end of file\ It is common practice to say that the EOF is record number 
nn or that the EOF is byte 15 of sector 12. Hence, it is a convenient term to use in 
describing the location of the last record or last byte in a file. 

extent 

A contiguous area of data storage. 

file 

A collection of related records treated as a unit; The word file is used in the general 
sense to mean any collection of informational items similar to one another in 
purpose, form and content. 

file parameters 

The data that describes or defines the structure of the file. 

FILESPEC 

A file specification and may include the 'file name', the 'the file name extension', 

'password', and 'disk drive' specification. 



file area 

The physical location of the file, on the disk, or in memory. 
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header record 

A record containing common, constant or identifying information for a group of 
records which follow, 

integer 

A natural or whole number with no decimal point. 

key 

A data item used to identify or locate a record or other data grouping. 

label 

A set of symbols used to identify or describe an item, record, message or file. 
Occasionally, it may be the same as the address in storage. 

least significant byte 

The significant byte contributing the smallest quantity to the value of a numeral. 

load module 

A program developed for loading into storage and being executed when control is 
passed to the program. 

logical 

An adjective describing the form of data organization, hardware or system that is 
perceived by an application program, programmer, or user; it may be different than 
the real (physical) form. 

logical file 

A file as perceived by an application program; it may be in a completely different 
form from that in which it is stored on the storage units. 

logical operator 

A mathematical symbol that represents a mathematical process to be performed on 
an associated operand. Such operators are 'AND', 'OR', 'NOT, 'AND NOT' and 
'OR NOT. 

logical record 

A record or data item as perceived by an application program; it may be in a 
completely different form from that in which it is stored on the storage units. 

machine-language 

See assembly language. 

monitor 

A program that may supervise the operation of another program for operation or 
debugging or other purposes. 

most significant byte 

The significant byte contributing the greatest quantity to the value of a numeral 
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nibble 

The four right most or left most binary digits of a byte. 

null 

An absence of information as contrasted with zero or blank for the presence of no 
information. 

on-line 

An on-line system is one in which the input data enter the computer directly from 
their point of origin, and/or output data are transmitted directly to where they are 
used. The intermediate stages such as writing tape, loading disks or off-line printing 
are avoided 

operating sy^stem 

Software which enables a computer to supervise its own operations, automatically 
calling in programs, routines, language and data as needed for continuous 
throughput of different types of jobs. 

parity . xi. 

Parity relates to the maintenance of a sameness of level or count, i.e., keepmg the 
same number of binary ones in a computer word to thus be able to perform a check 
based on an even or odd number for all words under examination. 

physical record 

A collection of bits that are physically recorded on the storage medium and which 
are read or written by one machine input/ output instruction. 

pointer 

The address or a record (or other data groupings) contained in another record so 
that a program may access the former record when it has retrieved the latter record. 
The address can be absolute, relative, symbolic, hence, the pointer is referred to as 
absolute, relative, or symbolic. 

primary entry 

The main entry made to the directory. 

random access 

To obtain data directly from any storage location regardless of its position, with 
respect to the previously referenced information. Also called 'direct access'. 

random access storage 

A storage technique in which the time requh^ed to obtain information is mdependent 
of the location of the information most recently obtained. 

read 

To accept or copy information or data from input devices or a memory register; Le., 

to read out, to read in. 
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record 

A group of related fields of information treated as a unit by an application program. 

relational operator 

A mathematical symbol that represents a mathematical process to perform a 
comparison describing the relationship between two values (e.g. < less than . . . > 
greater than . . . equal . . . and combinations thereof. 

search 

To examine a series of items for any that have a desired property or properties. 

sector 

The smallest addressable portion of storage on a diskette. 

seek 

To position the access mechanism of a direct-access storage device at a specified 
location. 

sequential access 

Access in which records must be read serially or sequentially one after the other; Le., 
ASCn files, tape. 

sort 

To arrange a file or data in a sequence by a specified key (may be alphabetic or 
numeric and in descending or ascending order). 

source code 

The text from which executable code is derived. 

system file 

A program used by the operating system to manage the executing program and/or 
the computer's resources. 

vector 

A line representing the properties of magnitude and direction. Since such a Uine' can 
be described in mathematical terms, a mathematical description (expressed in 
numbers, of course) of a given 'direction' and * magnitude' is referred to as a Vector'. 

verify 

To check a data transfer or transcription. 

working storage 

A portion of storage, usually computer main memory, reserved for the temporary 
results of operations. 

write 

To record information on a storage device. 

zap 

To change a byte or bytes of data in memory on on diskette by using a software utility 
program. 
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BASIC is not 
nearly as slow as most 
programmers think it is. BASIC Faster 
and Better shows you how to super- 
charge your BASIC, with 300 pages 
of fast, functions and subroutines. 

You won't find any trivial 'check- 
book-balancing' programs in this 
book- it's packed with useful 
programs. 

Tutorial for the beginner, instruc- 
tive for the advanced, and invaluable 



for the professional, this 
book doesn't just talk ... it 
shows how! All of the routines are 






1953 West 
11th Street 
Upldnd,CA 
91786 (714) 
946-5805 



also available on disk, so that you 
can save hours of keyboarding and 
debugging. 

BASIC Faster & Better and Other 
Mysteries is $29.95. and the two 
program disks are $19.95 each. The 
# 1 disk BFBDEM contains all the 
demonstration programs, and #2 
BFBLIB has all the library functions. 

Get the book and/ or disks from 
your local IJG dealer and B. Dalton 
bookstores. 



JQ Compijcte/iBookA & So^tijoo/ie 




Microsoft trademark Microsoft Corporation 
Apple trademark Apple Computer Inc. 
TRS-80 trademark TANDY Corporation 
Electric Pencil 1981 Michael Shrayer 



BOOKS 

T^S-SO Disk & Other Mysteries. H.C. Pennington. 

The "How to" book of Data Recovery. 1 28 pages. $22.50 

Microsoft Basic Decoded & Other Mysteries. 

James Farvour. The Complete Guide to Level 11 
Operating Systems & BASIC. 312 pages ........ $29.95 



The Custom TRS-80 & Other Mysteries. 

Dennis Bathory Kitsz. The Complete Guide to 
Customizing TRS-80 Software & Hardware. 
336 pages 



$29.95 



BASIC Faster & Better & Other Mysteries. 

Lewis Rosenfelder. The Complete Guide to BASIC 
Programming Tricl<s& Techniques. 290 pages $29.95 

Electric Pencil Operators Manual. Michael Shrayer. 

Electric Pencil Word Processing System Manual. 

1 23 pages $24.95 

The Custom Apple. Winfried Hofacker& Ekkehard 
Floegel. The Complete Guide to Customizing the Apple 
Software and Hardware. 1 90 pages $24.95 

Machine Language Disk I/O & Other Mysteries. 

Michael D. Wagner. A Guide to Machine Language Disk I/O 

for the TRS-80 Models I and II. 

Available October 1 982 $29.95 

TRSDOS 2.3 Decoded & Other Mysteries. 

James Lee Farvour. Commented Guide to TRSDOS 2.3 for 
the Model 1. Available December 1 982 $29.95 



SOFTWARE 



Electric Pencil. Michael Shrayer. 

Word Processing System. Available in DISK $89.95 

STRINGY FLOPPY or CASSETTE $79.95 

Red Pencil. Automatic Spelling Correction Program. 
For use with the Electric Pencil Word Processing Sys;tem. 
Available in DISK ONLY $89.95 

Blue Pencil.:!: Dictionary- Proofing Program. 

For use with the Electric Pencil Word Processing System. 

Available in DISK ONLY $89.95 

:^ Requires Red Pencil program. 

BFBLIB. Lewis Rosenfelder. Basic Faster & Better 
Library Disk 32 Demonstration Programs., Basic Overlays. 
Video Handlers. Sorts & more for the Model I & II. 
Available in DISK ONLY $1 9.95 

BFBDEM. Lewis Rosenfelder, Basic Faster & Better 
Demonstration Disk. 121 Functions, Subroutines & 
User Routines for the TRS-80 Model i & II. 
Available in DISK ONLY $1 9.95 



Prices Subject to change without notice 



Add $4.00 shipping and handling charge per item. 

California residents add 6% sales tax. Canadian residents add 20% for exchange rate. 
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